Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
3-86252
Ломброзо
2003-12-02 23:29
2003.12.26
Соединение с MS SQL по TCP-порту, отличному от 1433


1-86407
VT
2003-12-14 16:52
2003.12.26
Профайлер для Delphi


1-86387
Mmax
2003-12-14 16:39
2003.12.26
Инсталлятор


8-86463
JohnJ
2003-08-22 01:19
2003.12.26
Продолжаю изучать DelphiX


7-86571
genek84
2003-10-22 09:14
2003.12.26
Проблема с TMemoryStream





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский