Текущий архив: 2006.06.25;
Скачать: CL | DM;

Вниз

Передача параметров форме   Найти похожие ветки 

← →
Lammmerrr   (2006-06-03 19:46) [0]

Как из Form1 передать Form2 параметры (несколько переменных), при её отображении (отображается через Form2.ShowModal)?

---

← →
antonn ©   (2006-06-03 19:53) [1]

type
 TForm2 = class(TForm)
 public
   procedure AdvancedShowModal(parameter:integer);
 end;

..
implementation
..

procedure TForm2.AdvancedShowModal(parameter:integer);
begin
parameter:=0; // :)
showmodal;
end;

---

← →
Sergey Masloff   (2006-06-03 20:16) [2]

чем не подходит обычное

with TForm2.Create(Application) do
try
 Property1 := SomeValue;
 Property2 := OtherValue;
 ShowModal();
finally
 Free();
end;


---

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

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх

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