摘要: View Code type TfrmMain = class(TForm) mmoMsg: TMemo; btnNewThread: TButton; btnShutdownAll: TButton; procedure btnNewThreadClick(Sender: TObject); procedure FormCreate(Sender: TObject); procedure btnShutdownAllClick(Sender: TObject); private { Private declarations } public ... 阅读全文
posted @ 2012-04-23 10:58 Jekhn 阅读(256) 评论(0) 推荐(0) 编辑