Текущий архив: 2009.04.12;
Скачать: 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 вся ветка
Текущий архив: 2009.04.12;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.013 c
