Button.Enabled := True (Sehr oft...)

[hathor]

Delphi-Quellcode:

var
 a: array [1,2,3,4,5,6,9] of Integer;
 i: Integer;

for I:=0 to ControlCount-1 do
  if Controls[I] is TButton and i is in a then // nicht getestet !
  TButton(Controls[I]).Enabled:=true;