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 !!!