Salvatore Coppola <[email protected]> hat am 14. März 2012 um 11:57
geschrieben:

> Set in the Object Inspector Borderstyle to bsDialog and the form
> behavior should be what you need



BorderStyle has nothing to do with ModalResult.

This is enough to close a modal dialog:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ModalResult:=mrOk;
end;
Note:
When a button's Modalresult is set, it will do the above when clicked.
Setting the Button1.ModalResult alone will not close the form.

Mattias


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

Reply via email to