Clube Delphi 101

Boa Noite Familia Delphiana, na edição 101 da clube delphi temos o artigo do nosso querido Luciano Pimenta - reaproveitamnteo de codigo, porem teve uma função que nao consegui usar se alguem puder me dar um exemplo eu desde ja agradeço :

procedure habilitadesabilitacontroles(value : boolean);
var
i : integer;
begin
for i := 0 to componentcount - 1 do
if (components[i] is tcontrol))then
(components[i]as tcontrol).enabled := values
end;