//--------------------------------------------------------------------- #include #pragma hdrstop #include "MainForm.h" #include "GetURL.h" //--------------------------------------------------------------------- #pragma resource "*.dfm" TURLDlg *URLDlg; //--------------------------------------------------------------------- __fastcall TURLDlg::TURLDlg(TComponent* AOwner) : TForm(AOwner) { } //--------------------------------------------------------------------- void __fastcall TURLDlg::FormCreate(TObject *Sender) { URLPath->Text = MainFrm->URLDataPath; URLPathChange(Sender); } //--------------------------------------------------------------------------- void __fastcall TURLDlg::URLPathChange(TObject *Sender) { if (URLPath->Text.Length() == 0) OKBtn->Enabled = false; else OKBtn->Enabled = true; } //---------------------------------------------------------------------------