Formulare dynamisch erzeugen - Problem mit Unit

[malloc]

Hallo,

ich will auf den AutoCreate für Formulare verzichen. Deshalb habe ich nur noch das Haupfenster das duch den AutoCreate erzeugt wird. Dieses und alle weiteren erzeugen sich dynamisch.
Der Code des Hauptfensters hab ich mir so gedacht...

Delphi-Quellcode:

unit MainFrm;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TFormMain = class(TForm)
    ButtonNew: TButton;
    procedure ButtonNewClick(Sender: TObject);
    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

uses
  // #### Die Unit des Neuen Fensters hier laden
  NewForm;

var
  FormMain: TFormMain;

implementation

{$R *.dfm}

procedure TFormMain.ButtonNewClick(Sender: TObject);
begin
  // #### Diese Function ist neben der Fensterklasse in der Unit NewFrm
  // #### Sie erzeugt das Fenster
  InitFormNew(self.Handle);
end;

Wie sicherlich viele denken können bekomme ich hier Querverweise mit den Units. Der Compiler gibt folgende Fehlermeldung aus:

Zitat:

[Fehler] MainFrm.pas(20): Deklaration erwartet, aber 'USES' gefunden
[Fehler] MainFrm.pas(32): Undefinierter Bezeichner: 'InitFormNew'
[Fataler Fehler] Windows.dpr(6): Verwendete Unit 'MainFrm.pas' kann nicht compiliert werden

Ich weis das es da einen Trick gibt dies zu vermeiden, aber wie geht das nochmal?

Danke im Vorraus !!!