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

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

Массив кнопок... [D2, D3, D4, D5, D6, D7, D2005, 95/98, ME, NT4, 2000, XP, 2003]


C@N ©   (2006-06-22 22:58:00) 

Вопрос у меня куча SpeelButton около 60 штук можно ли их обЪединить в массив , чтоб обращаться SpeedButton[i] итп
Заране сенкс


C@N   (2006-06-24 17:04:00) [1]

Решил проблему!!!
type
TButArr = array[1..3] of TButton;
Var  butar: TButArr;

//
///
ButtArr[i]:=Button1;
///
/////
ButtArr[i].caption:='PreveD';
//////
итп...
///
//
Всем спасибо за помощь...


!_SM_!   (2006-06-24 14:36:00) [2]

И они должны быть созданы....


!_SM_!   (2006-06-24 14:26:00) [3]

Можно.
SPBArray=array[0..59] of TSpeedButton;
...
for N:=0 to 59 do
SPBArray[N]:=TSpeedButton(FindComponent('Spbb'+IntToStr(N)));

имена спидбутонов должны быть Spbb0, Spbb1, Spbb2....Spbb59;


Шпиён   (2006-06-24 14:23:00) [4]

D6:
Creates and initializes an instance of TSpeedButton.
constructor Create(AOwner: TComponent); override;


Шпиён   (2006-06-24 14:13:00) [5]

А ругательство процитировать?


C@N   (2006-06-24 14:08:00) [6]

D5 SPBArray[x]:=TSpeedButon.Create;на это ругается почем свет стоит!!!


manevil   (2006-06-24 12:25:00) [7]

ага, только не
...
etc.
, а
...
etc ;


Loginov Dmitry   (2006-06-24 11:37:00) [8]

C@N ©   (24.06.06 11:17) [2]
Фигня какая-то...(((


Что, [1] не компилится?

Тогда etc. убери. Ее только D2006 начала понимать :-)


C@N   (2006-06-24 11:17:00) [9]

Фигня какая-то...(((


unknown   (2006-06-22 23:23:00) [10]

Можно.
SPBArray=array[0..59] of TSpeedButton;
...
SPBArray[x]:=TSpeedButon.Create;
with SPBArray[x] do
begin
Name:='abc+IntToStr(x);
Parent:=Self;
OnClick:=btn1click;
...
etc.
 end;


Наверх

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