button.enable funktioniert nicht aus einer procedure heraus

[roga]

Hallo und herzlich Willkommen!

Warum deklarierst Du es nicht direkt in deiner Form? Dann gibt es normalerweise auch keine Probleme. Außerdem könnstest Du die beiden procedures zusammenfassen und nur den entsprechenden Wert übergeben.

Delphi-Quellcode:

  private
    { Private-Deklarationen }
    procedure button_einaus(DoEnable: Boolean); 
  public
    { Public-Deklarationen }
  end;

  ...

  procedure TForm1.button_einaus(DoEnable: Boolean);
  begin 
    button1.enabled := DoEnable;
    ...
  end;

  // Aufruf

  button_einaus(True); // oder False