【搞定】[请求]自己实现的工作台如何在流转流程后自动刷新待办列表**

newjack

如题。


请问处理消息的代码在哪里？

alang

参考 协同系统\任务\任务中心信息
大致的步骤是：
在自己的工作台上，引用 协同系统\任务\任务库
定义一个变量     FTaskUpdateDelegate: TTaskNotifyDelegate;
定义一个过程     procedure TaskUpdate(const TaskGUID: array of string);
procedure TTASKCENTERINFO.TaskUpdate(const TaskGUID: array of string);
begin
  TTaskServices.TaskUpdate(DataSetTaskIndex, TaskGUID);
end;
过程的实现部分，调用任务库的函数，第一个参数是自己定义的任务数据集

在工作台创建时候
  // 一定要用域记住，不然无法释放
  FTaskUpdateDelegate := TaskUpdate;
  TTaskServices.TaskUpdateNotifies.Add(FTaskUpdateDelegate);
在工作台释放时候
  TTaskServices.TaskUpdateNotifies.Remove(FTaskUpdateDelegate);

newjack

编译不能通过，提示没有定义TTaskNotifyDelegate

我已经引用任务库了呀。

可以任务库因为没有源码打不开

newjack

编译不能通过，提示没有定义TTaskNotifyDelegate

我已经引用任务库。

任务库因为没有源码打不开

alang

uses增加了 TaskLib没有？

newjack

是我忘了加了，呵呵，谢谢^_^

我再试试

newjack

OK了，结帖吧