Скачать: CL | DM;

Как передавать переменные из одной формы в другую?   Найти похожие ветки 

← →
lobach ©   (2006-10-28 20:26) [0]

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

---

← →
vidiv ©   (2006-10-28 20:37) [1]

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

---

← →
DiamondShark ©   (2006-10-28 20:43) [2]

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

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


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

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

---

← →
Anatoly Podgoretsky ©   (2006-10-28 21:35) [3]

Очень странный алгоритм, что то здесь не так.

---

← →
Ketmar ©   (2006-10-28 21:39) [4]

телепатирую: автор не прописал взаимные uses.
в остальном -- полностью согласен с [3].
2lobach: переработай. форма ввода вообще не должна знать, от кого получила значение. и кому его отдавать. значение должен забирать тот, кому оно нужно.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.031 c