Я бы посоветовал разобраться с is и as, и как выше сказали, использовать tag
for i := 0 to Form1.ComponentCount - 1 do
if (Form1.Components[i] is TButton) then
if (Form1.Components[i] as TButton).Tag in [1,2,3] then
(Form1.Components[i] as TButton).Enabled := false;
