Sender soll den Titel des Formulars bestimmen

[Thomas F]

Ich wollte die Caption eines Formulars vom Sender abhängig machen
Ich weiss nicht, warum dieser Code nicht funktioniert

Delphi-Quellcode:

procedure TForm4.FormShow(Sender: TObject);
begin
if Sender = Unit1.Form1.speedbutton9
then Form4.Caption := ' Eintrag ändern';//Unit4

if Sender = Unit1.Form1.Speedbutton11
then Form4.Caption :='Neuer Eintrag';//Unit4
end;
end;

Wenn man den Speedbutton9 drückt, soll das Formular den Titel "Eintrag ändern"haben,
bei Speedbutton11 den Tiel "Neuer Eintrag" haben.
Liegst vielleicht daran, dass die Speedbuttons in einer anderen Unit sind ???