<html>
<head>
<meta content="text/html; charset=UTF-8" http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
Yes, I tried debugger, debugger stoped onclick, its work step by
step after end of onclick event, but loose control message process.
mean f8 step jump to qtwidget, idle, and some in code.<br>
<br>
<blockquote>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;">Project
project1 raised exception class 'External: SIGFPE'.</p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;"> In file
'lclproc.pas' at line 860:</p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;">if
(length(Msg) div (length(Msg) div 10000))=0 then ;<!--EndFragment--></p>
</blockquote>
<pre wrap=""><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"><style type="text/css">
p, li { white-space: pre-wrap; }
</style></pre>
first this error popup, click "okay" and then jump to that line in
editor and wait, then click to run and <br>
this error popup<br>
<blockquote>Debugger exception class 'RunError(200).<br>
in file 'lclproc.pas' at line 860<br>
</blockquote>
Break, continue button. Click to continue button and<br>
<blockquote> Debugger Exception Notification<br>
Project project1 raised exception class 'EDivByZero' with message:<br>
Division by zero<br>
in file 'lclprocçpas' at line 860<br>
</blockquote>
Break, continue button. Click to continue button and last error :)<br>
<meta name="qrichtext" content="1">
<blockquote>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;"><!--StartFragment-->Division
by zero.</p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;">Press OK
to ignore and risk data corruption.</p>
<p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
margin-right:0px; -qt-block-indent:0; text-indent:0px;">Press
Cancel to kill the program.<!--EndFragment--></p>
</blockquote>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<style type="text/css">
p, li { white-space: pre-wrap; }
</style>program work normal. Test code on down. Message triggered open
different form, application work normal, if click insert or any
button this error list same.<br>
<br>
procedure TFRM_.NAV_Click(Sender: TObject; Button:
TDBNavButtonType);<br>
begin<br>
NAV_Clickx(Button);<br>
end;<br>
<br>
procedure TFRM_.NAV_Clickx(Button: TDBNavButtonType);<br>
begin<br>
case Button of<br>
nbInsert : PostMessage(Self.Handle, LM_USER, 1, - 2);<br>
nbDelete : ;<br>
nbEdit : ;<br>
end;<br>
end; <br>
<br>
<div class="moz-cite-prefix">05-04-2014 05:57 tarihinde, Mattias
Gaertner yazdı:<br>
</div>
<blockquote cite="mid:20140405045748.2da95d13@limapholos"
type="cite">
<pre wrap="">In file 'lclproc.pas' at line 860:
if (length(Msg) div (length(Msg) div 10000))=0 then ;
</pre>
<pre wrap="">
Have you tried to use the debugger?
Mattias
</pre>
</blockquote>
<br>
</body>
</html>