Hier würden dir
Events weiterhelfen.
Entweder abonnierst du auch in Form2 das OnClick Event des Buttons in Form1 oder du definierst dir ein eigenes Event, das ausgelöst wird, sobald du den Button klickst.
Quellcode Form1:
Delphi-Quellcode:
private
FOnButtonClick: TNotifyEvent
public
property OnButtonClick: TNotifyEvent read FOnButtonClick write FOnButtonClick;
...
procedure Form1.ButtonClick(Sender: TObject);
begin
if Assigned(FOnButtonClick) then
FOnButtonClick(Sender);
end;
Quellcode Form2:
Delphi-Quellcode:
procedure Form2.Form2Show(Sender: TObject);
begin
Form1.OnButtonClick := ClickEventHandler;
end;
procedure Form2.ClickEventHandler(Sender: TObject);
begin
// Nächster Tutorial Schritt einleiten
end;
Der Quellcode ist nur so runtergeschrieben und nicht getestet. Es ist möglich, dass Fehler drin sind. Schau dir aber bitte trotzdem das Tutorial auf Delphi-Treff an, damit du verstehst, was genau hier passiert. Mein Beispiel soll nur als Grundlage bzw. als Anfang dienen.