[sandysman]

Как создать массив кнопок? пишу так

Код:

MassivButtnes: array  [0..250,0..250] of TButton;

дальнейшие манипуляции приводят просто к увеличению кнопки, а не созданию новых кнопок.

[NumLock]

Код:

var
  ButtonArr: array [0..15] of TButton;
  i: Integer;
begin
  for i:=0 to Length(ButtonArr)-1 do
  begin
    ButtonArr[i]:=TButton.Create(Self);
    ButtonArr[i].Parent:=Self;
    ButtonArr[i].Left:=i*40;
    ButtonArr[i].Top:=i*20;
    ButtonArr[i].Caption:=IntToStr(i);
  end;
end;

[sandysman]

Вот тоже самое считай писал и ничего, но я только с двух мерным пробовал, с ним же так же будет?

[NumLock]

ну только еще один цикл добавится

[sandysman]

Еще такая проблема, как теперь назначить событие на клик кнопки из массива? Надо переписывать класс? Или самому создать это событие?

[Alegun]

Сообщение от sandysman

...как теперь назначить событие на клик кнопки из массива?..

Можно прописать свою процедуру нажатия в юните

Код:

...
private
   procedure MyClick(Sender: TObject);
...

procedure TForm1.MyClick(Sender: TObject);
begin
...
...

end;

а в вышеприведенный цикл создания кнопок добавить строчку

Код:

ButtonArr[i].OnClick:= MyClick;