Скачать: CL | DM;

События на кнопках   Найти похожие ветки 

← →
MVA`   (2007-04-11 15:59) [0]

Подскажите, пожалуйста, как приписать  одно  и то же событие сразу большому числу кнопок?

---

← →
Сергей М. ©   (2007-04-11 16:00) [1]

так жа как и малому

---

← →
MVA`   (2007-04-11 16:05) [2]

Кнопок 100, а 30 из них надо приписать, например, возможность открывать WORD.
И  что, Buttton(I)click для каждой кнопки?

---

← →
Ega23 ©   (2007-04-11 16:07) [3]

нет.

---

← →
homm ©   (2007-04-11 16:07) [4]

> И  что, Buttton(I)click для каждой кнопки?

Нет, Button1Click вполне будет достаточно. Выдели их все и назначь один обработчик onClick

---

← →
Desdechado ©   (2007-04-11 16:07) [5]

Button30.OnClick:=ButtonWordClick;

---

← →
Elen ©   (2007-04-11 16:08) [6]

в цикле типа такого :

for i:=0 to form1.componentscount-1 do
 if form1.components[i].classname:="TButton"
  then TButton(form1.components[i]).OnClick:=<твоя процедура>


---

← →
Reindeer Moss Eater ©   (2007-04-11 16:08) [7]

Разумеется

---

← →
MVA`   (2007-04-11 16:15) [8]

СПАСИБО

---

← →
homm ©   (2007-04-11 16:21) [9]

Пожалуста.

---

← →
Ega23 ©   (2007-04-11 16:47) [10]

>
> for i:=0 to form1.componentscount-1 do
>  if form1.components[i].classname:="TButton"
>   then TButton(form1.components[i]).OnClick:=<твоя процедура>
>


1. Будет работать ТОЛЬКО для экземпляров TButton. Для наследников - не будет. Здесь лучше is использовать: if (Components[i] is TButton) then ...
2. Не <твоя процедура>, а метод. Процедура и метод - разные вещи.

---

← →
MsGuns ©   (2007-04-11 21:19) [11]

Не слушайте этих умников - см. TActionList

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.017 c