Q qiuying Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-16 #1 我在DBGRID中插入或修改记录时,当输入重复记录时,系统将会显示错误信息, 我想屏蔽掉系统错误,自己在DATASET的ONPOSTERROR中弹出错误对话框。请问如何 屏蔽错误。
H hanly2008 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-16 #2 你可以定义一个错误信息的捕捉过程: procedure Tf_menu.AppException(Sender: TObject; E: Exception); var p_cwdh:integer; //错误代号 p_cwxx:string; //错误信息 begin p_cwdh:=Getlasterror; p_cwxx:=e.Message ; application.MessageBox(p_cwxx,'提示',mb_ok+mb_iconinformation); end; 然后根据你的需要,具体运用吧
你可以定义一个错误信息的捕捉过程: procedure Tf_menu.AppException(Sender: TObject; E: Exception); var p_cwdh:integer; //错误代号 p_cwxx:string; //错误信息 begin p_cwdh:=Getlasterror; p_cwxx:=e.Message ; application.MessageBox(p_cwxx,'提示',mb_ok+mb_iconinformation); end; 然后根据你的需要,具体运用吧
L l213 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-16 #3 你可以在调用post的时候这样处理: try table.post; except if Excepition.message='post error' then showmessage(asfdadsfasd') else raise; end;
你可以在调用post的时候这样处理: try table.post; except if Excepition.message='post error' then showmessage(asfdadsfasd') else raise; end;
J jiefeij Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-17 #4 http://www.delphibbs.com/delphibbs/dispq.asp?LID=1327780可能对你的问题有用。