Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как передавать переменные из одной формы в другую? [D7, XP]

lobach © (2006-10-28 20:26:00)
Здравствуйте мастера!!
У меня такой вопрос:
К примеру есть две формы. На одной лежит кнопка и есть переменная.
На другой edit и кнопка.
При нажатии на кнопку в первой форме должна открытся вторая, в которой я ввожу значение переменной из первой формы. А при нажатии кнопки на второй форме значение присваивается и форма закрывается.
Мои вопросы:
1.Как определить с помощью какой кнопки была открыта вторая форма (если у меня их 10 штук).
2.Как передать значение переменной из одной формы в другую.

Ketmar (2006-10-28 21:39:00) [1]
телепатирую: автор не прописал взаимные uses.
в остальном -- полностью согласен с [3].
2lobach: переработай. форма ввода вообще не должна знать, от кого получила значение. и кому его отдавать. значение должен забирать тот, кому оно нужно.

Anatoly Podgoretsky (2006-10-28 21:35:00) [2]
Очень странный алгоритм, что то здесь не так.

DiamondShark (2006-10-28 20:43:00) [3]

> 1.Как определить с помощью какой кнопки была открыта вторая
> форма (если у меня их 10 штук).

У обработчика события OnClick есть параметр Sender.

> 2.Как передать значение переменной из одной формы в другую.

Через public поля/свойства "второй" (по приведённому описанию) формы.

vidiv (2006-10-28 20:37:00) [4]
var frm:TForm2;

begin
frm := TForm2.Create(self);
frm.Edit1.Text := LocalObjectVariable;
if frm.ShowModal=mrOk then
LocalObjectVariable := frm.Edit1.Text;
frm.free;
end;

мне кажеться тебе это надо...
только учти, что на второй форме должна быть как минимум одна кнопка с параметром ModalResult равным mrOk

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »