【结】请问功能树的点击事件写在哪了?我想在里面添加点代码[请求]

Set_qing

感谢楼上
不过你发的那个链接做出来的效果也是功能运行之后才判断
我想要的效果是在点击功能后到功能开始运行之间做一个判断
小弟愚钝,还是无法实现,请问有更好的方法吗


补充一下,我觉得是在功能的点击事件里做比较好,不过我找不到那个事件

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=18073

Set_qing

unit YWGN13;

interface

uses
  Business.System, Business.Model;

type
  TYWGN13 = class(TFunc)
  private
    {private declarations}
  public
       procedure DoRun;override;
    {public declarations}
  end;

implementation
procedure TYWGN13.DoRun;
begin
  //加些判断是否关闭功能。
     self.Terminate;
end;

end.

dorun是启动功能过程中的一个事件。


楼上,看程序这个DoRun事件是自己定义的吧,因为我在X3里找不到这个事件

atiger

呵呵，DoRun，是重载，这些代码是功能上的，不是功能窗体上的，
见附件，打开功能，选中右键菜单的 查看代码，然后添加DoRun方法。

unit YWGN13;

interface

uses
  Business.System, Business.Model;

type
  TYWGN13 = class(TFunc)
  private
    {private declarations}
  public
      procedure DoRun;override;
    {public declarations}
  end;

implementation
procedure TYWGN13.DoRun;
begin
  //加些判断是否关闭功能。
     self.Terminate;
end;

end.

Set_qing

终于解决了,哈哈....
灰常感谢各位的帮助,恩人呐,呵呵
结贴吧,谢谢了

atiger

呵呵，客气了。