Страница 1 из 1

циклы

Добавлено: 20 янв 2006, 11:53
maelz
как с помощью цикла присвоить всем кнопкам на форме одинаковую высоту.
(ну забыл я :cry: )

Добавлено: 20 янв 2006, 12:38
LAngel

Код: Выделить всё

for i := 0 to ComponentCount-1 do
  if Component[i] is TButton then
    (Component[i] as TButton).Height := 22;

Добавлено: 20 янв 2006, 13:19
maelz
OK

Добавлено: 23 янв 2006, 14:33
Игорь Акопян
ещё можно в дизайн-тайме выделить все кнопки и на странице свойств поставить нужное значение для Height :)