И снова 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. такой глобвльной переменной не должно быть вообще

var normal: TNormal_1;

> normal.ShowModal;
> if normal.moadResul = mrOk

if normal.ShowModal = mrOK

И снова MDI (передача переменных)? Найти похожие ветки