bisher:
Delphi-Quellcode:
procedure KnopfDrück;
begin
Form2 := tForm2.create (self);
Form2.Anfang := Anfang;
end;
besser:
Delphi-Quellcode:
procedure KnopfDrück;
begin
Form2 := tForm2.create (self);
Form2.Anfang := Anfang;
ShowMessage(Form2.Anfang^.text);
end;
//bzw. eine weitere Methode in Form2 deklarieren + definieren, mit der du dann weiterarbeitest
// Beispiel:
Delphi-Quellcode:
procedure KnopfDrück;
begin
Form2 := tForm2.create (self);
Form2.Anfang := Anfang;
Form2.weitereMethode();
end;
Form2:
Delphi-Quellcode:
procedure weitereMethode();
begin
ShowMessage(Anfang^.text));
end;