起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 187|回复: 11

【搞定】流程问题,急急急[请求]**

[复制链接]
发表于 2007-8-30 10:34:51 | 显示全部楼层 |阅读模式
如何用代码控制流程不启动(即使点击了流转按钮)?
回复

使用道具 举报

发表于 2007-8-30 10:49:17 | 显示全部楼层
把流程设置成流转时启动,在BeforeFlowOut事件里对Command.Accept := False;
回复 支持 反对

使用道具 举报

发表于 2007-8-30 10:54:11 | 显示全部楼层
流程代理,然后事件里  command.accept:=false;
你搜索下老帖子
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-30 11:00:16 | 显示全部楼层
这样搞不定,不起作用,流转时提示后,点击‘否’,流程还是可以启动
回复 支持 反对

使用道具 举报

发表于 2007-8-30 11:19:11 | 显示全部楼层
procedure TMainForm.FlowBroker1BeforeFlowOut(Sender: TObject; Command: TFlowOutCommand);
begin
command.Accept:=false;
end;
不能流转的。。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-30 11:31:22 | 显示全部楼层
procedure TMainForm.FlowBrokerBeforeFlowOut(Sender: TObject; Command: TFlowOutCommand);
var
  lno:string;
begin
  lno:=DataSetBrokerMeetingSummary.DataSet.FieldByName('no').AsString;
  jsDialogs.ShowMsg(lno,'');
  if lno='' then
    begin
      jsDialogs.ShowMsg('编号为空,不能启动流程','启动流程提示');
      Command.Accept:=False;
    end;
end;

帮忙看看我的代码,有问题吗;
加了这些语句,代办任务中仍然出现主题为空的代办任务???
回复 支持 反对

使用道具 举报

发表于 2007-8-30 11:42:40 | 显示全部楼层
没有问题
回复 支持 反对

使用道具 举报

发表于 2007-8-30 11:44:31 | 显示全部楼层
你编译签入,刷新缓存试试
回复 支持 反对

使用道具 举报

 楼主| 发表于 2007-8-30 12:19:37 | 显示全部楼层
试过了,待办中还是产生任务
回复 支持 反对

使用道具 举报

发表于 2007-8-30 13:42:54 | 显示全部楼层
是否可以远程看一下
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-1-15 21:02 , Processed in 0.038717 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表