[delphi.com.ar]

procedure TForm1.Button1Click(Sender: TObject);
  procedure SetEnabled(AEnabled: boolean);
  begin
    btAceptar.Enabled  := AEnabled;
    btCancelar.Enabled := AEnabled;
    btEliminar.Enabled := AEnabled;
  end;
begin
  ...
  SetEnabled(Table1.State in [dsInsert,dsEdit]);
  ...
end;