S
shgproduct
Unregistered / Unconfirmed
GUEST, unregistred user!
在vcl中有如下源代码:
TDockOverEvent = procedure(Sender: TObject;
Source: TDragDockObject;
X, Y: Integer;
State: TDragState;
var Accept: Boolean) of object;
我想问一下,这是种什么类型的东东,为什么又是过程又是object呢?
TDockOverEvent = procedure(Sender: TObject;
Source: TDragDockObject;
X, Y: Integer;
State: TDragState;
var Accept: Boolean) of object;
我想问一下,这是种什么类型的东东,为什么又是过程又是object呢?