摘要: {$mode objfpc}{$H+} 或者 procedure TForm1.Button1Click(Sender: TObject); begin Edit1.Text := 'start...'; TThread.CreateAnonymousThread( procedure var i: 阅读全文
posted @ 2024-10-29 10:17 老夫子的PASCAL 阅读(185) 评论(0) 推荐(0)