Delphi中设置DLL任务监视器为何只能单例使用？

本文共计228个文字，预计阅读时间需要1分钟。

我在自己的DLL中使用OmniThreadLibrary+2.09，主应用程序和dll使用相同的SimpleShareMem内存管理器。我利用这段代码创建了自定义的监视器：+FMonitor: TOmniEventMonitor.Create(nil); 当“

我在我的DLL中使用OmniThreadLibrary 2.09,主应用程序和dll使用相同的SimpleShareMem内存管理器.

我用这段代码创建了自己的监视器：

FMonitor: TOmniEventMonitor; ... FMonitor := TOmniEventMonitor.Create(nil);

当我尝试使用此监视器创建新任务时,我收到错误“只能使用单个监视器监视任务”

FTask := OtlTaskControl.CreateTask(TaskWorker) .OnMessage( procedure(const ATaskControl: IOmniTaskControl; const AMsg: TOmniMessage) begin ... end) .MonitorWith(FMonitor) // <----- Error .OnTerminated( procedure (const ATaskControl: IOmniTaskControl) begin ... end) .Run();

如何使用自己的显示器监控我的任务？

OnMessage函数创建隐式监视器,它接收任务消息并调用您的匿名函数. OnTerminated也是如此.

如果您希望使用MonitorWith,则应将消息处理和终止处理实现为监视器事件,而不是使用OnMessage / OnTerminated函数.