Form aufrufen

[XecuterX]

Hi, ich hab auch ne Frage:
Ich habe 2 Formen.
Wenn Form1 erstellt wird, soll Form2 aufpoppen. Im Code sieht das so aus:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, U_element, U_Queue, Char_erstellung;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Char_menue : Tform3;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Char_menue := Tform3.Create(self);
  char_menue.ShowModal;
end;

end.

"
Mein Problem ist, dass ich beim Starten des Projekt immer die Fehlermeldung bekomme, dass eine Exception der Klasse EAccesviolation mit der Meldung "Zugriffsverletzung bei der Addresse *hier stehen viele Parameter* in Modul 'Project1.exe'" in Projekt1.exe ist.




Das andere Formular sieht so aus:

Delphi-Quellcode:

unit Char_erstellung;

interface

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

type
  TForm3 = class(TForm)
 *hier stehen die Komponenten (also buttons, labels etc.)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

*hier sind die ganzen prozeduren*

end.