checkboxes and labels

← →
Markvolsh © (2002-08-07 18:39) [0]

Как циклом перебрать однородные компоненты (напр., CheckBoxes в Tabsheet)?

Как организовать размещение текста в checkbox, buttons, labels в нескольких строках?

Как включить EditBox и label в RadioGroup (поставить напротив каждого переключателя)? (Если просто поставить их поверх, то label не будет виден)

← →
-=Prior=- (2002-08-07 18:50) [1]

1) Есть отличная функция application.findcomponetnt(NameString:string) // подробнее см. справку.
2) на torry.net есть специальные компоненты
3) Зачем включать в РадиоГроуп. Создай отдельную рамку, вклучай туда однородные радиоэлементы (все компоненты в первой вкладке).

← →
Bart © (2002-08-08 13:39) [2]

1) не очень рацонально, но тем не менее альтернативный вариант (если не знаешь имен чекбоксов):

for i:= 0 to Tabsheet.ComponentsCount - 1 do begin
if Tabsheet.Components[i] is TCheckBox then begin
(Tabsheet.Components[i] as TCheckBox).{методы, свойства}
end;
end;

2) в Form1.OnCreate пишешь

SetMultiLine(Label1.Handle);
Label1.Caption := "Использовать"#13#10"подкаталоги";

checkboxes and labels Найти похожие ветки