run-time

← →
bober (2003-12-12 16:39) [0]

ещё один вопросик по run-time
создаю форму

form:=tform.create(application);
....
на ней button и edit
button:=tbutton.create(form);
edit:=tlabel.create(edit);
.......
по нажатию кнопки срабатывает процедура buttonclick
button.onclick:=buttonclick
....

в самой процедуре пытаюсь обратится к edit этой же новосозданной формы:
procedure tform1.buttonclick(sender:Tobject);
begin
showmessage(edit.text);
end;

Компилятор ругается на неизвестность edit в процедуре.
Где и как нужно определить edit для того чтобы можно было использовать его в процедуре?

Заранее спасибо.

← →
panov © (2003-12-12 16:45) [1]

Предлагаю почитать статью о создании объектов в run-time на сайте "Королество Delphi".
Тогда такие вопросы сразу отпадут.

← →
Skier © (2003-12-12 16:47) [2]

1)

> edit:=tlabel.create( edit);

Это ещё что такое ?!

2)

> Где и как нужно определить edit для того чтобы можно было
> использовать его в процедуре?

Книги нужно читать !

← →
Anatoly Podgoretsky © (2003-12-12 17:06) [3]

Ну это ссылка на самого себя как владельца, в зависимости от порядка исполнения или верная или чепуха, второе вероятнее.

← →
bober (2003-12-12 17:18) [4]

edit:=tedit.create(form);
опечатка

статью почитал
со своим вопросом так и не разобрался

← →
panov © (2003-12-12 17:26) [5]

Ну так объяви edit в условиях видимости для процедуры tform1.buttonclick, например, объяви глобальной переменной.

← →
bober (2003-12-12 17:35) [6]

спасиба.

...дописался

Edit.Parent:=Form1
TOgda tocino poidet!

> edit:= tlabel.create(edit);
> .......
> showmessage(edit. text);

И где ж ты собрался у Label"а свойство Text искать?

run-time Найти похожие ветки