ShiftState im MouseUp-Event richtig aufrufen

[padavan]

Hallo liebes Forum,
was muss an der Stelle "???" rein, damit ich ein MouseUp-Event von einem anderen Button aufrufen kann.
So wie das

Delphi-Quellcode:

Button1click(self);

ja auch geht, so muss das

Delphi-Quellcode:

procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Button1.Caption := 'klappt';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Button1MouseUp(Button2,MBLeft, ??? ,1,1);
end;

ja auch irgendwie gehen.

[marabu]

Hallo padavan,

ein empty set [] würde genügen - es sei denn du hast etwas spezielles vor.

Grüße vom marabu

[padavan]

:mrgreen:

ne, reicht völlig aus - Danke dir!