Как обратиться к динамически созданной форме из главной.

[BadBoyAlex]

Здравствуйте, уважаемые форумчане!
Столкнулся с интересной задачкой. Есть тип

Код: Выделить всё

type TMyRec = record
form: TForm;
end;
var DForm1, DForm2, DForm3: TMyRec;


Есть две формы: главная (Main) и 3 динамически создаваемая (D1, D2, D3). На главной форме расположены 2 кнопки, а на каждой динамической есть Memo.

При клике по кнопке 1 создаются все динамические формы. Каждая форма записывается в переменную DForm*.

Вопрос: КАК ПО КЛИКУ по кнопке 2 написать в каждое Memo текст: "Hi, form D*!"?

[vitaly_l]

DForm1.memo1.lines := "Hi, form D*!";

[BadBoyAlex]

DForm1.memo1.lines := "Hi, form D*!";

И получаю AV...

[Лекс Айрин]

BadBoyAlex, а ты их создай, перед работой с ними.

{Application.}CreateForm(TMyRec,DForm1);
DForm1.Show;
DForm1.visible:=true;//если форма отключена
DForm1.memo1.lines := "Hi, form D*!";

[BadBoyAlex]

BadBoyAlex, а ты их создай, перед работой с ними.

Спасибо. Работает.