随笔分类 -  delphi 消息

摘要:选择用线程函数解决。调用主窗体代码:procedure TForm1.Button17Click(Sender: TObject);var Thd:FindForm;beginThd := FindForm.Create(False);thd.DoIt := True;Thd.MainWnd := ... 阅读全文
posted @ 2014-09-29 08:58 cnby3 阅读(420) 评论(0) 推荐(0)