| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138 |
- unit InterfaceConfig;
- interface
- uses
- superobject, Graphics;
- type
- TGroupVersion = (gvUnkown, gvIntegration, gvIndependent);
- TGroupShareVersion = (gsvUnkown, gsvOld, gsvNew);
- IBaseConfig = interface
- ['{04A30FDB-43B9-438A-A7E7-D75F22C07CCB}']
- function Load(ALoginName: string = ''): Boolean;
- procedure Save;
- procedure RestoreDefault;
- procedure UndoChange;
- function ToJsonStr: string;
- end;
- ITestConfig = interface(IBaseConfig)
- ['{71CF795D-0133-435C-90D3-1C83E08DCFFB}']
- function GetHello: string;
- procedure SetHello(const Value: string);
- end;
- IHotkeyConfig = interface(IBaseConfig)
- ['{D871A971-8E90-4AF3-9910-5AF75F5F2E54}']
- function GetCopyScreen: string;
- function GetReadMessage: string;
- function GetSendMessage: string;
- procedure SetCopyScreen(const Value: string);
- procedure SetReadMessage(const Value: string);
- procedure SetSendMessage(const Value: string);
- end;
- IFaceConfig = interface(IBaseConfig)
- ['{BC42349B-7AB3-4DA6-B748-3212DA15C04A}']
- function GetFace(const shutcut: string): ISuperObject;
- end;
- IFontConfig = interface(IBaseConfig)
- ['{000B6E31-DB87-4CEF-AEB4-2C47FA1626CF}']
- function GetFont: string;
- procedure SetFont(const Value: string);
- end;
- INetConfig = interface(IBaseConfig)
- ['{7556EFD0-1066-495E-ADF6-B1A51C7E1B01}']
- function GetIP: string;
- function GetPort: Integer;
- procedure SetIP(const Value: string);
- procedure SetPort(const Value: Integer);
- end;
- IUIViewConfig = interface(IBaseConfig)
- ['{3EE8C5CF-D5CB-4940-80BD-962917C9BB6C}']
- function GetDev: Boolean;
- function GetRemoteUI: Boolean;
- function GetRemoteUIHost: string;
- procedure SetDev(const Value: Boolean);
- procedure SetRemoteUI(const Value: Boolean);
- procedure SetRemoteUIHost(const Value: string);
- function GetForm(AName: string): ISuperObject;
- function GetFormColor: TColor;
- end;
- IClientConfig = interface(IBaseConfig)
- ['{2C4F7FAC-0C50-4CCA-B752-B189D77ADA2A}']
- function GetFirstLoginConfirm: Boolean;
- function GetGradeSystem: Boolean;
- function GetNewCenterServer: Boolean;
- function GetOtherServersDisable: Boolean;
- function GetSMSName: string;
- function GetUserInfoCheck: Boolean;
- function GetUserInfoController: Boolean;
- end;
- IGroupConfig = interface(IBaseConfig)
- ['{6DD23675-98F2-4EAA-AC20-050AC98DB140}']
- function GetGatewayEnable: Boolean;
- function GetImageHost: string;
- function GetSocketHost: string;
- function GetGroupVersion: TGroupVersion;
- function GetGatewayHost: string;
- end;
- IGroupShareConfig = interface(IBaseConfig)
- ['{FDA8249C-F023-4B66-8DD4-BE488367565B}']
- function GetHost: string;
- function GetVersion: TGroupShareVersion;
- end;
- IOfflineFileConfig = interface(IBaseConfig)
- ['{D877CD3E-F7DA-414A-9DDF-4D9E8F70C600}']
- function GetIP: string;
- function GetPackageSize: Int64;
- function GetPort: Integer;
- function GetVersion: TGroupVersion;
- end;
- TAppCentreShowType = (stForm, stOnMainform);
- /// <remarks>
- /// ptCanlian ²ÐÁª
- /// ptOH 걺£
- /// </remarks>
- TAppCentreProjectType = (ptNormal, ptCanlian, ptOH);
- IAppCentreConfig = interface(IBaseConfig)
- ['{4B88DF67-3ED4-45E0-9502-663BF2450B80}']
- function GetAuthHost: string;
- function GetBSLoginout: Boolean;
- function GetEmbeddedClientHost: string;
- function GetEnable: Boolean;
- function GetLxtAppKey: string;
- function GetLxtAppSecret: string;
- function GetShowType: TAppCentreShowType;
- function GetProjectType: TAppCentreProjectType;
- end;
- ICaConfig = interface(IBaseConfig)
- ['{F6594EA0-E1A6-42D7-B49F-CDC74B7D99D5}']
- function GetAppID: string;
- function GetEnable: Boolean;
- function GetURL: string;
- function GetCASubject: string; stdcall;
- end;
- IBehaviorConfig = interface(IBaseConfig)
- ['{CA07AFDA-1271-4B21-8769-92C9FFB88FB7}']
- function GetEnable: Boolean;
- function GetHost: string;
- end;
- implementation
- end.
|