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

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

Динамическое создание кнопок [D6, WinXP]


Страницы:   1 2

Destroyer ©   (2004-06-23 17:40:00) 

Я создаю динамически кнопки в своей процедуре :

procedure createbuttons;
var mainbuttons:array [1..42] of TSpeedButton;
begin    
mainbuttons[n]:=tSpeedButton.create(self);!!!
// ^--здесь ругается на self, undeclared undentifier
mainbuttons[n].top:=1;
mainbuttons[n].left:=mainbuttons[n].width+2;
mainbuttons[n].Parent:=form1.panel3;
end;
Как сделать так, чтобы компилятор не ругался?


TUser   (2004-06-23 18:18:00) [21]

А self ты действительно не определил. В классе TForm1 али еще где-нибудь, self - это данный экземпляр класса. А здесь у тебя класса нет.


YurikGL   (2004-06-23 18:02:00) [22]


> mainbuttons[n]:=tSpeedButton.create(self);

mainbuttons[n]:=tSpeedButton.create(application);


Destroyer   (2004-06-23 17:58:00) [23]

В каком месте?


YurikGL   (2004-06-23 17:42:00) [24]


> // ^--здесь ругается на self, undeclared undentifier

поставь application.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо