Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.03.2011, 18:38   #1
f_z_l
 
Регистрация: 21.03.2011
Сообщений: 3
По умолчанию speedbutton....

Люди подскажите мoжно ли вместо номера Speedbutton написать какую либо переменную например:
var
i:integer;
begin
i:=1;
speedbutton(i).glyph:=....{и так далее};
end;
заранее спасибо...
f_z_l вне форума Ответить с цитированием
Старый 21.03.2011, 18:48   #2
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

можно использовать:

Код:
var xButtons: array[0..15] of TSpeedButton;
или
var xButtons: array of TSpeedButton;
Для последнего варианта память запросить (например с помощью SetLength)

В обоих случаях массив проинициализировать:
Код:
xButtons[0]:=SpeedButton1;
xButtons[1]:=SpeedButton2;
...
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 21.03.2011, 18:52   #3
f_z_l
 
Регистрация: 21.03.2011
Сообщений: 3
По умолчанию

Огромное спасибо!!!!
f_z_l вне форума Ответить с цитированием
Старый 21.03.2011, 18:56   #4
OlegVE
Форумчанин
 
Регистрация: 27.09.2010
Сообщений: 376
По умолчанию

Здравствуйте
Вариант второй
Код:
(form1.FindComponent('SpeedButton'+ IntToStr(i)) as TSpeedButton).Glyph.LoadFromFile('Ваш_BMP_файл_с_полным_путём');
До свидания
P.S.
Цитата:
speedbutton(i).glyph:=....{и так далее};

Последний раз редактировалось OlegVE; 21.03.2011 в 18:58.
OlegVE вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
границы SpeedButton Пропеллер Компоненты Delphi 0 16.05.2010 22:40
SpeedButton mustang007 Общие вопросы Delphi 5 14.05.2009 19:44
ОЧистить SpeedButton ZhekON Компоненты Delphi 4 19.06.2007 12:28