摘要:
TThreadStatus = (TError, TRun, TNotFree, TNull, TPause, TResume, TStop, TSuccessful); TMessageEvent = procedure(var Message: TMessage) of object; TMForm = class(TForm) private FMessageEvent: TMessageEvent; procedure WndProc(var Message: TMessage); override; public property MessageEven... 阅读全文
posted @ 2012-07-13 11:56
金琪
阅读(123)
评论(0)
推荐(0)