//--------------------------------------------------------------------------- #include #pragma hdrstop #include "WorkAreaSaveDialogForm.h" #include "Exception.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "RzButton" #pragma link "RzLabel" #pragma resource "*.dfm" //--------------------------------------------------------------------------- TWASaveDialog *WASaveDialog; //--------------------------------------------------------------------------- __fastcall TWASaveDialog::TWASaveDialog(TComponent* Owner) : TForm(Owner) { this->RzLabel1->Caption = IDS_MESSAGE_ONLYWORKREGIONSAVE; this->AllButton->Caption = "All"; this->SelectButton->Caption = "Selected"; this->CancleButton->Caption = "Cancel"; nAnswer = 0; /* if(nAnswer == 1) else if(nAnswer ==2) else if(nAnswer ==3) */ } //--------------------------------------------------------------------------- void __fastcall TWASaveDialog::AllButtonClick(TObject *Sender) { ModalResult = 1; } //--------------------------------------------------------------------------- void __fastcall TWASaveDialog::SelectButtonClick(TObject *Sender) { ModalResult = 2; } //--------------------------------------------------------------------------- void __fastcall TWASaveDialog::CancleButtonClick(TObject *Sender) { ModalResult = 3; } //---------------------------------------------------------------------------