【结帖】[请求]流转触发OnChange 事件问题**

chinavvv

流转后，为什么会出发 业务信息上的 OnChange 事件呢？
这么才能不让他触发呢？

zfang

业务信息上没有onchange事件啊。

chinavvv

业务信息中的 表格文档，我做了个 DataEdit 的 onchange 事件，单独运行正常。走流程，每次流转后，又触发了次该事件。就出现错误了。

zfang

基于什么原因要在这个事件中处理代码？

zfang

要想实现不重复执行的话，可以在这个事件中加一个判断，根据某一个标记来决定 这个代码是否执行。

chinavvv

选择年度，触发Label 上显示 该年度：
代码如下：

procedure TXMSB_FS.DataEditNDChange(Sender: TObject);     //选择年度 触发事件
begin
        if  DataEditND.Text<>'' then
            begin
            Label1.Caption:=  SysUtils.inttostr(SysUtils.StrToInt(DataEditND.Text)+1)+'年';
            Label2.Caption:=  SysUtils.inttostr(SysUtils.StrToInt(DataEditND.Text)+2)+'年';
            Label3.Caption:=  SysUtils.inttostr(SysUtils.StrToInt(DataEditND.Text)+3)+'年';
            Label4.Caption:=  SysUtils.inttostr(SysUtils.StrToInt(DataEditND.Text)+4)+'年';
            Label5.Caption:=  SysUtils.inttostr(SysUtils.StrToInt(DataEditND.Text)+5)+'年';
            Label15.Caption:= DataEditND.Text;
            end;
end;

chinavvv

流传后
错误信息，断点聚焦在：   if  DataEditND.Text<>'' then  
DataEditND.Text  值 为空字符串

chinavvv

有一种解决方法：
  用 oncreare 事件 + OnExit 事件 取代  OnChange 事件

可以结贴了。

zfang

哦，好的，谢谢楼主反馈。