[Lazarus] TForm.ModalResult := mrOk problem
freeman35 at delphiturkiye.com
Mon Nov 25 16:33:12 CET 2013
property ModalResult : TModalResult read FModalResult write FModalResult;
TCustomForm class property. its just variable
on virtualbox system:
I add TButton on form and TButton.ModalResult set to MrOk. and click to
Button then similar work TForm.ModalResult := MrOk.
I don't wanna use tbutton, How to run My code "F.ModalResult := MrOk."
25-11-2013 16:45 tarihinde, FreeMan yazdı:
> I have a strange problem.
> I have last svn fpc and lazarus on kubuntu 13.10 x64
> FRM_Log_In := TFRM_Log_In.Create(AOwner);
> Result := FRM_Log_In.ShowModal;
> "FRM_Log_In.ModalResult := mrOk;" this code work on my system, work
> mean, form close and move to after "FRM_Log_In.Showmodal;"
> "FRM_Log_In.ModalResult := mrCancel;" working too.
> I have a virtualbox and installed kubuntu 13.10 x64 there too. not
> install any fpc or lazarus.
> when copy my application to virtualbox, form showing and all component
> (label, edit, etc) work fine. "FRM_Log_In.ModalResult := mrCancel;"
> working too but
> "FRM_Log_In.ModalResult := mrOk;" never and ever working :)) no any
> exception, its work like this code not working. I mean for the test, I
> add showmessage('hello'); after this line, message not showing. But
> application is still working normal.
> And this is just in virtualbox system, on my system everytking is okey.
> Has anyone have idea ??
> Thank you
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
More information about the Lazarus