| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

И снова MDI (передача переменных)? [D7, WinXP]

samumka ©   (2004-10-26 09:01:00) 

Итого. Имеем форму 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 вызывает ошибку.
Спасибо.

---

ЮЮ   (2004-10-26 09:41:00) [1]

var normal: TNormal _1;

---

begin...end   (2004-10-26 09:41:00) [2]

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

if normal.ShowModal = mrOK

---

ЮЮ   (2004-10-26 09:39:00) [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. такой глобвльной переменной не должно быть вообще

---

samumka   (2004-10-26 09:26:00) [4]

>> MDIChild_1.TEdit_1.Text:=String_1 вызывает ошибку

>Какую?

EAccessViolation по такому-то адресу.

>Что значит "вызывается"?
Прошу прошения. Создается
TMDIChild_1.Create(Application);

TNormal_1.Create(Application).ShowModal;

---

Gero   (2004-10-26 09:03:00) [5]

> MDIChild_1.TEdit_1.Text:=String_1 вызывает ошибку

Какую?

> Из неё вызывается MDIChild_1
> Из MDIChild_1 вызывается форма Normal_1

Что значит "вызывается"?

---

Наверх