//--------------------------------------------------------------------------- #include #pragma hdrstop #include "ParameterScope.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TParameterScopeForm *ParameterScopeForm; //--------------------------------------------------------------------------- __fastcall TParameterScopeForm::TParameterScopeForm(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TParameterScopeForm::BitBtn1Click(TObject *Sender) { m_Scope = 1; ModalResult = mrOk; } //--------------------------------------------------------------------------- void __fastcall TParameterScopeForm::BitBtn2Click(TObject *Sender) { m_Scope = 2; ModalResult = mrOk; } //--------------------------------------------------------------------------- void __fastcall TParameterScopeForm::BitBtn3Click(TObject *Sender) { m_Scope = 3; ModalResult = mrOk; } //--------------------------------------------------------------------------- unsigned short TParameterScopeForm::getScope() { return m_Scope; }