Массив компонентов

← →
Алексей Смирнов (2002-09-28 21:02) [0]

Здравствуйте. Все ваши правила прочитал, искал на вашем сайте и по всему инету - но этого так и не нашел, а если и нашел - то все там объяснено поверхностно. И даже много книг купил.
Подскажите бедному начинающему. Массив я научился создавать, а вот как с ним работать - никто не знает. Создал я например массив кнопок btn[1..10]. А как с ними действия производить, например нажатие мышкой? Очень прошу подробный пример, а то уже голова болит, да и в инете я много денег прожрал из-за поиска этой информации.
Заранее ОГРОМНОЕ СПАСИБО!!!

← →
Юрий Зотов © (2002-09-28 21:18) [1]

Объявляем:
var
Btn: array[1..10] of TButton;

И далее работаем с каждым элементом массива, как с обычной кнопкой. Например.

for i := 1 to 10 do
begin
Btn[i] := TButton.Create(Self);
with Btn[i] do
begin
Parent := Panel1;
SetBounds(...);
OnClick := MyOnClickHandler;
...
end
end;

Все подробности здесь:
http://www.delphikingdom.com/helloworld/runtime_comp.htm

← →
Separator © (2002-09-28 21:28) [2]

лавное не забуть отобразить кнопки в нужно тебе месте

← →
Arnold (2002-09-29 11:55) [3]

Для новичков можно ещё так

var
Btn: array[1..n] of TButton;

//Создаёшь любую процедуру с параметрами точно повторяющие //параметры события которого ты хочешь вызвать.
procedure TForm1.CClick(Sender:TObject);
begin
with (Sender as TButton)
begin

end;
end;

for i:=1 to n do
begin
Btn[I]:=TButton.Create(Form1);
........
Btn[I].OnClick:=CClick;
Btn[I].Parent:=Form1;
end;

← →
Алексей Смирнов (2002-09-29 15:52) [4]

Большое всем спасибо. Все заработало, но возникла еще проблема: возьмем к примеру игру сапер: четыре изображения содержат соответсвенно не нажатую, нажатую, с флагом и с миной картинку.
Как мне сравнить мой массив кнопок с той из четырех, вернее по какому свойству? Такая инструкция не работает:
if TImage(sender).Picture:=ImgOn.Picture; где ImgOn - изображение с нажатой кнопкой. И вообще по какому параметру можно сравнивать полученный массив кнопок с кнопками изначально расположенными на форме?
Еще раз всем спасибо.
P.S. На ссылке, что указал Юрий Зотов я ответ на этот вопрос не нашел.

Tag

Массив компонентов Найти похожие ветки