@Pfoto: Warum sollte die Form1 von aussen auf die Elemente von TForm2 zugreifen? Das widerspricht der Datenkapselung doch komplett.
@Marco Steinebach: Dein Ansatz ist schon fast komplett. Ich hatte es so beschrieben und meinte eigentlich nur noch eine Zeile mehr:
Delphi-Quellcode:
type
TForm2 = Class (TForm)
lModal: TListView; // die Listview des Modalen Formulars.
// der Constructor wird nicht mehr überschrieben.
Function ShowModal (l: TListView): Integer; Reintroduce;
end;
...
function TForm2.ShowModal (l: TListView): Integer;
begin
lModal.Assign (l);
result := inherited ShowModal;
if result = mrOk then
l.Assign(lModal);
end;
Mehr nicht. Datenkapselung gewart, Konstruktor noch immer Original und die Daten wandern und her...