[dec]

Hola,

Tal vez más o menos así:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  // De todos modos revisa la ayuda de FindComponent
  TButton(FindComponent('Button1')).Enabled := false;
end;