[ Eledigt ]Inkompatible Typen TformClass und Class reference

[Newbi]

Also ich verstehe zur Zeit nur Bahnhof.

Das ich ein Frame einbinden will ist zutreffend, dieses hat aber bis auf sich selbts noch keinen Inhalt.

Ich verwende Delphi 6.

Ich bin noch net so erfahren, aber eben sehr lernwillig.
Was der Code in groben Zügen macht ist mir soweit auch geläufig, bei irgendeiner feinheit hapert es aber.

Diese Feinheit habt ihr anscheind gefunden und auch sicherlich sehr gut erklärt was ich machen soll.

Ich verstehe es nur leider nicht. Könnte bitte jemand die erklärung nochmal erklären ??




Nachtrag: Danke nur ist der Groschen gefallen.




Nachtrag 2: Oder auch nicht.

Delphi-Quellcode:

unit Unit_Main;

interface

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

type
  TFrm_Main = class(TForm)
    Panel_Menu: TPanel;
    Panel_Content: TPanel;
    Btn_Adress_Add: TButton;
    Btn_Adress_Edit: TButton;
    Btn_Close: TButton;
    Button4: TButton;
    Btn_Adress_Search: TButton;
    Btn_Adress_Delete: TButton;
    Btn_Adress_Clear: TButton;
    Button8: TButton;
    Button9: TButton;
    procedure FormCreate(Sender: TObject);
    procedure ShowForm;
  private
        newForm: TForm;
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    Start_first_time:integer;           // Variable die den ersten Start des Programmes speichert.
  end;

var
  Frm_Main: TFrm_Main;

implementation

uses Unit_Startseite;

{$R *.dfm}

procedure TFrm_Main.FormCreate(Sender: TObject);
begin
// Wurde die LadenSeite schon ausgeführt ?
        If Start_first_time = 1
                then
                        begin
                         // Buttens Einblenden.
                                Btn_Adress_Add.Visible:=true;
                                Btn_Adress_Clear.Visible:=true;
                                Btn_Adress_Edit.Visible:=true;
                                Btn_Adress_Delete.Visible:=true;
                                Btn_Adress_Search.Visible:=true;
                                Btn_Close.Visible:=true;
                        end
                else
                        begin
                                ShowForm(TFrm_Startseite);
                        end;
end;

procedure TFrm_Main.ShowForm;
begin
      newForm:= TFrm_Startseite.Create(self);
      newForm.BorderStyle := bsNone;
      newForm.Parent := Panel_Content; // "In diesem Panel" werden die Forms angezeigt.
      newForm.Align := alClient;
      newForm.Show;
end;

end.

Nun kommen 2 Fehler:
1) Zu viele Parameter ( ShowForm(TFrm_Startseite); )
2) Inkompatible Typen [TForm und TFrm_Startseite] ( newForm:= TFrm_Startseite.Create(self); )