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

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

← →
Ньюб   (2005-01-16 21:11) [0]

Есть три кнопки  Btn1,Btn2 и Btn3.  Как через цикл изменить их свойства(например caption).

---

← →
Yanis ©   (2005-01-16 21:16) [1]

var
 i:Integer;
begin
 for i := 0 to Form1.ComponentCount-1 do
   if (Form1.Components[i] is TBitBtn) then
     (Form1.Components[i] as TBitBtn).Caption := "Кнопка "+IntToStr(i+1);

---

← →
Ньюб   (2005-01-16 21:18) [2]

Спасибо

---

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

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



Память: 0.45 MB
Время: 0.034 c