Einzelnen Beitrag anzeigen

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge
 
Delphi XE7 Enterprise
 
#9

Re: Alle Buttons auf Form -> Enabled := FALSE ?

  Alt 7. Mär 2008, 12:09
Dann habe ich aber wieder das anfangsproblem:

Delphi-Quellcode:
var
 TSheet: TTabSheet;

...

TSheet := (FindComponent('TabSheet1') as TTabSheet);

for I := 0 to TSheet.ComponentCount - 1 do
begin

 if TSheet.Components[I] is TBitBtn then
   (TSheet.Components[I] as TBitBtn).Enabled := TRUE;

end;
... Zugriffsverletzung kommt dann bei for ...

Gruss

Holger
  Mit Zitat antworten Zitat