Form3=new TForm3(this);
int res = Form3->ShowModal();
if(res == 1){
ShowMessage("ok");
}else if(res == 2){
ShowMessage("cancel");
// Application->Terminate();
}
delete(Form3);
--------------
Form3:this->ModalResult=1; 会自动关闭窗口返回 ok
------注意Application->CreateForm(__classid(TForm3), &Form3); 这个就不要了