Вниз
Скачать: CL | DM;

Работа с модальным формами   Найти похожие ветки 

← →
Pavel   (2009-02-20 14:12) [0]

Как мне значение переменной передать из родительской формы в модальную?
Заранее благодарю за ответы.


← →
Ega23 ©   (2009-02-20 14:21) [1]

type
 TModalForm = class (TForm)
 public
   property SomeValue : TSomeType read ... write ....;
 end;

var
 frm : TModalForm;
begin
 Application.CreateForm(TModalForm, frm);
 try
   frm.SomeValue := ....
   frm.ShowModal;
 finally
   frm.Free;
 end;
end;


← →
Alexandra   (2009-02-20 14:24) [2]

в родительской опубликуй её :
private
   { Private declarations }
  Fvrem : integer;
public
 property vrem : integer read Fvrem write Fvrem;

тут же в каком нить обработчике
присвой данные (ну к примеру):
procedure TNPSForm.BtnChangeClick(Sender: TObject);
begin
edFind.text := IntToStr(vrem)
end;

а в модальной
вызывай...


← →
Pavel   (2009-02-20 14:34) [3]

В родительской я ее опубликовал и присвоил значение в обработчике. Как мне вызвать ее в родительской форме?


← →
Pavel   (2009-02-20 14:35) [4]

Описка, извените. Как мне переменную вызвать в модальной форме?


← →
Dennis I. Komarov ©   (2009-02-20 14:38) [5]


> Как мне значение переменной передать из родительской формы
> в модальную?

Телепатор мне подсказывает, что формы тут вообще не причем, или опишите подробно что Вам требуется...


← →
Alexandra   (2009-02-20 14:44) [6]

ну в обработчике и вызывайте ...
procedure TNPSForm.BtnChangeClick(Sender: TObject);
begin
with fmAdd ( <- это ваша модальная форма) do
begin
 if not Assigned(fmAdd) then
  Application.CreateForm(TfmAdd, fmAdd);

   Edit9.Text := IntToStr(GridID);

end;


← →
Alexandra   (2009-02-20 14:46) [7]

т е в конце
Edit9.Text := IntToStr(vrem);


← →
Pavel   (2009-02-20 14:46) [8]

Есть форма Form1, в ней переменной s присваиваю значение. Затем открываю вторую форму Form2 так:
Form2:=TForm2.Create(self);
Form2.ShowModal;
И теперь во второй форме переменнй t мне нужно присвойть значение переменной s.


← →
Сергей М. ©   (2009-02-20 15:08) [9]


> Есть форма Form1, в ней переменной s


В форме нет никаких переменных.
Переменные есть в юните.


← →
Плохиш ©   (2009-02-20 15:21) [10]


> Pavel   (20.02.09 14:46) [8]

Назови хотя бы одну причину, что бы тебе отвечали. Ответов ты всё равно не читаешь или не понимаешь...


← →
Ega23 ©   (2009-02-20 15:30) [11]


> Pavel   (20.02.09 14:46) [8]


Мда... Клинический случай...


← →
Юрий Зотов ©   (2009-02-20 16:39) [12]

> Pavel   (20.02.09 14:46) [8]

Какие переменные имеются в виду - поля форм или глобальные переменные модулей?



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

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



Память: 0.47 MB
Время: 0.015 c
4-1208106519
yus
2008-04-13 21:08
2009.04.12
TWAIN_32.DLL


15-1234181465
desc
2009-02-09 15:11
2009.04.12
Где в Мазиле расположен КЭШ ?


2-1235320820
KillaTank
2009-02-22 19:40
2009.04.12
Модальное окно в ДБ


2-1233807493
SyS
2009-02-05 07:18
2009.04.12
В запросе прибавить к дате число через параметр


15-1234172735
pasha_golub
2009-02-09 12:45
2009.04.12
OpenSSL: ssl.h перевод для Delphi




   Наверх