So klappt es ja auch, wenn alles auf einer Form ist bzw wenn ich den Namen der anderen Form habe.
Im Prinzip möchte ich das hier in eine Zeile packen:
Delphi-Quellcode:
if fenster.name = 'Form1'
then newButton.onclick := form1.buttonclick
else if fenster.name = 'Form2'
then newButton.onclick := form2.buttonclick
else if fenster.name = 'Form3'
then newButton.onclick := form3.buttonclick
Da "Fenster" ja eine Variable ist, hab ich ja nicht den Procedurennamen der entsprechenden Form.
In jeder Form ist die Procedure auch anders aufgebaut, hat aber immer den gleichen Namen.