Zitat von
HolgerCW:
Das sieht schon ganz gut aus. Nur ist das Problem, das auf dem TabSheet mehrere GroupBoxen sind und in diesen GroupBoxen dann die BitBtns.
Wie bekomme ich es nun hin, das alle BitBtns in den GroupBoxen enabled = TRUE werden ?
Gruss
Holger
Das wird kompliziert^^
Nimm dir doch nen Array und speicher bei Programmanfang alle Referenzen von den BitBtns in dem Array... dann brauchst du nur noch das Array duchzugehen
edit: oder so:
Delphi-Quellcode:
var i: integer;
begin
for i := 0 to ComponentCount - 1 do
if (Components[i] is TBitBtn) and (TBitBtn(Components[i]).Parent.Parent = TabSheet1) then
TBitBtn(Components[i]).Enabled := false;
end;