Работа с классами в билдере. Функции

FileInput()
        {
                if (!OpenDialog1->Execute()) return;
                TStringList *list = new TStringList;
                list->LoadFromFile(OpenDialog1->FileName);
                Edit1->Text = list->Strings[0];
                delete list;
        }

class EnterData
{
public:
TOpenDialog *OpenDialog1;
TEdit *Edit1;
FileInput()
        {
                if (!OpenDialog1->Execute()) return;
                TStringList *list = new TStringList;
                list->LoadFromFile(OpenDialog1->FileName);
                Edit1->Text = list->Strings[0];
                delete list;
        };
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
EnterData in;
in.FileInput();
}

class EnterData
{
public:
TOpenDialog *OpenDialog1;
TEdit *Edit1;
TRadioButton *RadioButton1;
ProgrammingInput();
void FileInput()
        {
                if (!OpenDialog1->Execute()) return;
                TStringList *list = new TStringList;
                list->LoadFromFile(OpenDialog1->FileName);
                Edit1->Text = list->Strings[0];
                delete list;
        }
};
//потом по Button1Click:
EnterData in;
in.FileInput();

int Choose(rdb)
        {
                if (RadioButton1->Checked==true) rdb=1;
                if (RadioButton2->Checked==true) rdb=2;
                if (RadioButton3->Checked==true) rdb=3;
                return rdb; 
        }

EnterData ch;
rdb=ch.Choose(rdb);

class EnterData
{
public:
TOpenDialog *OpenDialog1;
TEdit *Edit1;
TRadioButton *RadioButton1;
TRadioButton *RadioButton2;
TRadioButton *RadioButton3;
//ну и далее функция и все такое