摘要: type TNotifyEventRef = reference to procedure(Sender: TObject); function AnonymousEvent(const Proc: TNotifyEventRef): TNotifyEvent; type TVtable = array[0..3] of Pointer; PVtable = ^TVtable; ...阅读全文
posted @ 2019-06-14 14:06 塞翁失身 阅读(38) 评论(0) 编辑