Here's how to prompt users whether they really want to exit your program or not (regardless of how they choose to close it):
- Select your form (named "Form1" for example) and double click on its "OnCloseQuery" event
- Define the "FormCloseQuery" procedure as follows:
1: procedure TForm1.FormCloseQuery(
2: Sender: TObject;
3: var CanClose: Boolean);
4: begin
5: if(mrNo = Mess
0 comments:
Post a Comment