Mainmenu

[Jan]

Hallo Hansa,
entschuldige, hätte ich wissen sollen
Naja, aber jetzt mal zu dem wie ich es gemacht habe:
ich habe in unit2 eine eigene Klasse definiert.
Diese Klasse wird in unit1 wie folgt bereitgestellt:

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
     var1:=tklassenname.create;
end;

In dieser Klasse ist eine Prozedur, welche ein form2.show oder form2.hide beinhaltet. Diese Prozedur kann ich dann in Unit1 Aufrufen.
Ich habe keine Ahnung ob das jetzt viel zu umständlich ist, aber bei mir klappt es zumindest.
Greetz
Jan