| mara |
| Отправлено: 02.03.2005, 11:20 |
|
Не зарегистрирован
|
Как из одной формы открыть другую и получить данные из первой формы? |
|
| telepath |
| Отправлено: 02.03.2005, 11:25 |
|
Станционный диспетчер
Группа: Участник
Сообщений: 132
|
В h-файлах прописать их друг у друга.
в первой форме открыть вторую:
во второй форме доступ к первой через указатель на первую форму типа:
| CODE | | Edit1->Text = Form1->Edit1->Text; |
|
|
| Bond |
| Отправлено: 02.03.2005, 11:30 |
|
Станционный диспетчер
Группа: Участник
Сообщений: 142
|
Вариант А:
Форма стоит в списке Project->Options->Forms->Auto-create forms:
| CODE | void __fastcall TFirstForm::Button1Click(TObject *Sender)
{
SecondForm->Show(); // или SecondForm->ShowModal();
} |
Вариант Б:
Создаем форму ручками
| CODE | void __fastcall TFirstForm::Button1Click(TObject *Sender)
{
Application->CreateForm(__classid(TSecondForm), &SecondForm);
SecondForm->ShowModal();
SecondForm->Free();
} |
Доступ к данным другой формы через стрелочку 
| CODE | | SecondForm->Left = 10 |
|
|
