What you are doing wrong is setting the form to mrOK but testing for mrNone in order to close the form.
At 11:31 AM 9/2/2007, you wrote: >procedure TfmCleanUpMain.btnOKClick(Sender: TObject); >begin > if fmprogress.showmodal <> mrNone then > close; >end; Ralph D. Wilson II Systems Analyst Home: (210) 497-2643 Cell: (210) 387-7744 Fax: (210) 497-5726 [EMAIL PROTECTED] [EMAIL PROTECTED] _______________________________________________ Delphi mailing list -> [email protected] http://www.elists.org/mailman/listinfo/delphi

