文件修改后被关闭时弹出一个是否保存的对话框，这个对话框如何做

文件修改后被关闭时弹出一个是否保存的对话框，这个对话框怎么做？
如题，象txt,word文件修改后被关闭时弹出一个是否保存的对话框,在bcb中这个对话框怎么做？

[解决办法]
在onclose()事件中
用MessageDlg().
如果返回mrOk,则执行保存操作.
[解决办法]
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
Action = caNone;
}
[解决办法]
close事件中：
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
if (MessageDlg( "File changed, save? ", mtInformation, mbOKCancel, 0) == mrCancel)
Action = caNone;
}