Wie frage ich bei OnClose ab ob ein Button geklickt wurde?

[JSB]

Wie frage ich bei OnClose ab ob ein Button geklickt wurde oder nicht? :roteyes:
Weil= Ich möchte eine Vielzahl von Befehlen ausführen (in einem anderm Formular) aber nur wenn ein bestimmter Button ausgeführt wurde! :?: :? :gruebel:

[Steve]

Delphi-Quellcode:

IF Sender IS TButton THEN
{edit} IF TButton(Sender).Name = strDerGesuchteName THEN ...

Gruß
Stephan :dance:

edit2: :oops: Frage nicht ganz aufmerksam gelesen... zweite Source-Zeile passt hier (OnClick) nich hin.. untere Lösung is sinnvoller

[oki]

Hi,

merke dir den letzten Button und verzweige in OnClose.
Bsp.:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    SpeedButton1: TSpeedButton;
    procedure SpeedButton1Click(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private-Deklarationen }
    FLastButton : TspeedButton;
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  FLastButton := Sender; // hier Button merken

  // hier weiter mit deinem Code
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  IF FLastButton = SpeedButton1 then begin
  // ..... hier deine Behandlung
  end;
  // hier eventuell mit anderen Button-Auswertungen weiter
end;

Gruß oki

[JSB]

Dankeschön!!! :-D :zwinker: :cheers: