Problem bei weiterleiten nach Unit 2

[DutchmanTom]

Hi leuts,
bin im Moment dabei ein Adressbuch zu programieren (per VCL-Anwendung).

Nun habe ich beschlossen, die TEdit-Felder für dass hinzufügen einer Adresse in eine eigene Unit aus zu gliedern, damit nit der ganze Wulst von Anzeige, Hinzufügen und Suchen in einer Form drin ist.

Das Problem ist nur dass jedes mal, wenn ich auf den Button klicke, der die Form mit den Hinzufügen öffnen soll, eine Fehlermeldung über eine Zugriffsverletzung kommt.

Ich Schrieb euch unten mal den Quellcode hin, der für die Weiterleitug und die Verarbeitung sorgen soll.

ich hoffe ihr könnt mit Helfen

gruß
DutchmanTom

Delphi-Quellcode:

procedure TForm1.BtnHinzuClick(Sender: TObject);
begin
  Form2.show;
  if Form2.showmodal=mrok then
    begin
    AdresseAnlegen(EdVorname.Text, EdNachname.Text, EdJob.Text, EdStrasse.Text,
                   EdOrt.Text, EdTelefon.Text);
    end;
end;