Форум: "Основная";
Текущий архив: 2003.12.26;
Скачать: [xml.tar.bz2];
Вниз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]спасиба.
...дописался
← →
alless (2003-12-12 18:15) [7]Edit.Parent:=Form1
TOgda tocino poidet!
← →
Bel (2003-12-12 21:13) [8]> edit:= tlabel.create(edit);
> .......
> showmessage(edit. text);
И где ж ты собрался у Label"а свойство Text искать?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.12.26;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c