© 1999-2048 dssz.net 粤ICP备11031372号
[Delphi] delphi多线程超COOL示例
说明: TMyThread = class(TThread) private step_mun: Integer; max_mun: Integer; FProgressBar: TProgressBar; FLabel: TLabel; procedure DoProgress; protected procedure Execute; override; public constructor Create(CreateSuspended: Boolean); end;<asanmusic> 上传 | 大小:170kb