RealICQClient/GroupClient/GroupModel.pas

unit GroupModel;

interface

type
  TRealICQTeamValidateType = ( tvAllCanJoinTeam = 0,
                               tvNeedValidate = 1,
                               tvAllCannotJoinTeam = 2,
                               tvAllCannotJoinTeamNew = 4);
                               
  TRealICQTeam = class
  private
    FTeamID: string;
    FTeamCaption: string;
    FTeamCreater: string;
    FTeamCallBoard: string;
    FTeamIntro: string;
    FTeamValidate: TRealICQTeamValidateType;
    FTeamManagers: string;
    FTeamMembers: string;
    FIsTempTeam: Boolean;
  public
    property TeamID: string read FTeamID write FTeamID;
    property TeamCaption: string read FTeamCaption write  FTeamCaption;
    property TeamCreater: string read FTeamCreater write FTeamCreater;
    property TeamCallBoard: string read FTeamCallBoard write FTeamCallBoard;
    property TeamIntro: string read FTeamIntro write FTeamIntro;
    property TeamValidate: TRealICQTeamValidateType read FTeamValidate write FTeamValidate;
    property TeamManagers: string read FTeamManagers write FTeamManagers;
    property TeamMembers: string read FTeamMembers write FTeamMembers;
    property IsTempTeam: Boolean read FIsTempTeam write FIsTempTeam;
  end;

  TSearchTeamResultRecord = class
  private
    FTeamID: String;
    FTeamCaption: String;
    FTeamIntro: String;
    FTeamCreater: String;
  public
    property TeamID: String read FTeamID write FTeamID;
    property TeamCaption: String read FTeamCaption write FTeamCaption;
    property TeamIntro: String read FTeamIntro write FTeamIntro;
    property TeamCreater: String read FTeamCreater write FTeamCreater;
  end;

implementation

end.