Forum: Programmieren allgemein
Delphi
by Neumann,
23. Apr 2021
Oder irgendwo im Quelltext der Unit2:Form1.SpeedButton1Click(Sender);
Ganz schlimm
Forum: Programmieren allgemein
Delphi
by Neumann,
23. Apr 2021
Also, das würde ich dann so machen:
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
MyBusinessobj.doSpeedbutton1click;
end;
Die 4 Zeilen können doch eigentlich nicht stören.
Forum: Programmieren allgemein
Delphi
by Neumann,
23. Apr 2021
Sowas könnte man zwar konstruieren, sehe aber keinen Nutzen.
Also etwa so umbiegen:
SpeedButton1.onClick := form2.speedbuttonX.onclick;
Würde ich nicht machen. Mag ja funktionieren, gefällt mir aber nicht.
Forum: Programmieren allgemein
Delphi
by Neumann,
23. Apr 2021
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
form2.Memo1.Clear;
end;