Текущий архив: 2004.11.07;
Скачать: CL | DM;
Вниз
И снова MDI (передача переменных)? Найти похожие ветки
← →
samumka © (2004-10-26 09:01) [0]Итого. Имеем форму MDIForm_1. Из неё вызывается MDIChild_1, на которой расположен TEdit_1. Из MDIChild_1 вызывается форма Normal_1, в которой производятся некотороые действия, результатом которых является переменная String_1. Вопрос: каким образом передать String_1 в MDIChild_1.TEdit_1.Text?
MDIChild_1.TEdit_1.Text:=String_1 вызывает ошибку.
Спасибо.
← →
Gero © (2004-10-26 09:03) [1]
> MDIChild_1.TEdit_1.Text:=String_1 вызывает ошибку
Какую?
> Из неё вызывается MDIChild_1
> Из MDIChild_1 вызывается форма Normal_1
Что значит "вызывается"?
← →
samumka © (2004-10-26 09:26) [2]>> MDIChild_1.TEdit_1.Text:=String_1 вызывает ошибку
>Какую?
EAccessViolation по такому-то адресу.
>Что значит "вызывается"?
Прошу прошения. Создается
TMDIChild_1.Create(Application);
TNormal_1.Create(Application).ShowModal;
← →
ЮЮ © (2004-10-26 09:39) [3]TNormal_1.Create(Application).ShowModal;
как всё запущено
var
normal: TNormal;
begin
normal := TNormal_1.Create(nil);
try
normal.ShowModal;
if normal.moadResul = mrOk then begin
Edit_1.Text := normal.Edit_1.Text;
end;
finally
normal.Free;
end;
end;
end;
З.Ы. и накаких MDIChild_1. такой глобвльной переменной не должно быть вообще
← →
ЮЮ © (2004-10-26 09:41) [4]var normal: TNormal_1;
← →
begin...end © (2004-10-26 09:41) [5]
> normal.ShowModal;
> if normal.moadResul = mrOk
if normal.ShowModal = mrOK
Страницы: 1 вся ветка
Текущий архив: 2004.11.07;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.039 c
