Как вывести сеткой одномерный массив кнопок в Delphi?

← →
Krema (2011-09-25 18:50) [0]

Здравствуйте, как можно сеткой 3х3 вывести одномерный массив кнопок на Delphi 7? Пытаюсь написать простой канкулятор с использованием массива кнопок. В линию получается а сеткой нет.
Так же интересно узнать как такой правильно кнопке задавать обработчик событий? Пока думаю писать процедуру или функцию и присваивать её значению but[i].OnClick.

← →
brother © (2011-09-25 19:00) [1]

> одномерный массив кнопок

пока работай в режиме дизайнера, раз есть проблеммы с рантаймом

← →
brother © (2011-09-25 19:01) [2]

> как такой правильно кнопке задавать обработчик событий

не понял...

← →
Омлет © (2011-09-25 19:16) [3]

В N столбцов как-то так:

for I := 0 to high(btns) do begin with btns[I] do SetBounds((I mod N) * (Width + 5), (I div N) * (Height + 5), Width, Height); end; end;

← →
MBo © (2011-09-25 19:17) [4]

http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=342

>В линию получается а сеткой нет.
Значит, нужно, чтобы обе координаты менялись

← →
Kolobok (2011-09-25 19:17) [5]

> не понял...

Как сделать так что бы при нажатии определённой кнопки в массиве but[i]. делалось то что надо. Например выводило в edit1 число.

Один end; лишний.

> Пока думаю писать процедуру или функцию и присваивать её значению but[i].OnClick.

Так и делай. Всем кнопкам один обработчик присвой, в котором по TButton(Sender).Tag или TButton(Sender).Caption определяй, что за кнопка нажата.

← →
Krema (2011-09-25 19:34) [7]

Спасибо всем за советы и ссылки. Буду пробовать.

Как вывести сеткой одномерный массив кнопок в Delphi? Найти похожие ветки