摘要: 在任务中发送消息, 可以是函数或者对象方法 TOmniTaskMessageEvent = procedure(const task: IOmniTaskControl; const msg: TOmniMessage) of object; TOmniOnTerminatedFunction... 阅读全文
posted @ 2014-08-13 17:21 TryHard 阅读(506) 评论(0) 推荐(0) 编辑
摘要: 1.使用procedure Parallel.Async(task: TProc; taskConfig: IOmniTaskConfig);匿名委托访问网站program main;{$APPTYPE CONSOLE}{$R *.res}uses System.SysUtils, OtlPar... 阅读全文
posted @ 2014-08-13 16:40 TryHard 阅读(660) 评论(0) 推荐(0) 编辑
摘要: program main;{$APPTYPE CONSOLE}{$R *.res}uses System.SysUtils, OtlParallel;begin Parallel.Async(procedure var i: Integer; begin for I := 0 to... 阅读全文
posted @ 2014-08-13 15:30 TryHard 阅读(486) 评论(0) 推荐(0) 编辑