On Fri, 04 Apr 2014 23:02:42 +0300
FreeMan <[email protected]> wrote:

> Hello,
> 
> if I use "OnClick" event, example
> 
> 
> procedure TFRM_.NAV_Click(Sender: TObject; Button: TDBNavButtonType);
> begin
> NAV_ClickXx(Button);// or PostMessage(Self.Handle, LM_USER, 1, - 2);
> end;
> 
> I get this error, and I cannot handle where is it.
> 
> Project UGS_Dental raised exception class 'External: SIGFPE'.
> 
> In file 'lclproc.pas' at line 860:
> 
> if (length(Msg) div (length(Msg) div 10000))=0 then ;

Have you tried to use the debugger?

Mattias

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to