这个是委托么,该怎么处理

这个是委托么

Delphi(Pascal) code

type TCenterIPClient_OnReceiveSms = procedure(Sender: TObject; TaskID: Integer; Mobile,Content: string) of object;

介绍详细点 给点资料

[解决办法]
不明白，帮你顶一下。分点分给我啊。
[解决办法]
// Adapter型实现类
TDuoConfigMDIAdapter = class(TInterfacedObject,IDuoConfigMDI)
private
FOwner:TComponent;
FConfigMDI:IDuoConfigMDI;
FTabSheetIndex: Integer;
public
constructor Create;overload;
constructor Create(AOwner:TComponent;AClass:TClass);overload;
destructor Destroy;override;
procedure ShowAndDock(ADockSite:TWinControl);
{ IDuoConfigMDI }
function Title:String;stdcall;
function Group:Integer;stdcall;
function CanDoApply:Boolean;stdcall;
procedure DoApply;stdcall;
function CanDock:Boolean;stdcall;
function InValid:Boolean;stdcall;
procedure DoSelectItem;stdcall;
{ 接口委托 }
property ConfigMDI:IDuoConfigMDI read FConfigMDI implements IDuoConfigMDI; // 如果其他类已经实现了 IDuoConfigMDI 的方法，可以用第二个Create


这个是委托。
你那个只是定义。

查看更多 下一篇