In der Annahme, dass du Form2 von Form1 aus aufrufst:
Delphi-Quellcode:
public
strgs: TStrings; // muss noch irgendwo created werden
{...}
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Show2(strgs);
end;
Delphi-Quellcode:
public
strgs: TStrings;
procedure Show2(v: TStrings);
{...}
procedure TForm2.Show2(v: TStrings);
begin
strgs := v;
Show;
end;
procedure TForm2.ButtonBClick(Sender: TObject);
begin
strgs.Asign(Memo1.Lines);
Hide;
end;
Ist nicht getestet aber müsst gehn.
Du kannst auch mit ShowModal arbeiten, dann kommt man zwar während Form2 offen ist nicht an Form1 heran, kann aber nach dem Schliessen noch in der procedure zum Öffnen direkt auf Form2.Memo1.Lines zugreifen