Форум: "Основная";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];

Вниз

Цикл   Найти похожие ветки 

← →
Растишка   (2005-05-20 20:24) [0]

Есть 10 label"ов :label1,Label2,Label3 и т.д. нужно составить цикл перебора этих label"ов и проверки св-ва Visible,с последним проблем нет,а вот цикл никак не могу составить...

---

← →
begin...end ©   (2005-05-20 20:29) [1]

Нужно проверить свойство Visible у всех label"ов формы?

---

← →
GanibalLector ©   (2005-05-20 20:50) [2]


 var I:Integer;
begin
for I:=0 to ComponentCount-1 do
 if (Components[I] is TLabel) then
  (Components[i] as TLabel).Caption:="Fuck";
end;


---

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

Форум: "Основная";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.011 c