Form zur Laufzeit neu erstellen

[HolgerCW]

Hallo zusammen,

ich erstelle am Anfang eine Anmeldemaske. Nachdem das Passwort richtig eingegeben wurde mache ich folgendes:

FormAnmeldung.Free; Wenn ich diese Form dann zur Laufzeit des Programmes wieder neu erstellen möchte, wollte ich das so machen:

Delphi-Quellcode:

Application.CreateForm(TFormAnmeldung, FormAnmeldung);
FormAnmeldung.Show;

Da tritt aber eine Zugriffsverletzung auf.

Was mache ich falsch ?

Gruss

Holger

[DeddyH]

Versuch es mal mitFormAnmeldung := TFormAnmeldung.Create(Application);

[Sharky]

Ich mach das immer so:

Delphi-Quellcode:

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  myForm2 : TForm2;
begin
  myForm2 := TForm2.Create(self);
  try
    myForm2.ShowModal;
  finally
    myForm2.Free;
  end;
end;

[mkinzler]

Dann könntest du die Form auch ohne Owner erzeugen

[Sharky]

Zitat von mkinzler:

Dann könntest du die Form auch ohne Owner erzeugen

Meinst Du mich?
Ja, ich weiss. Ist mehr so "die Macht der Gewohnheit".

[mkinzler]

Zitat:

Meinst Du mich?

Ja meinte ich.
ist ja nicht falsch aber unnötig.

[HolgerCW]

Vielen dank an euch.

Wenn ich nun

FormAnmeldung.Free; gemacht habe, müsste ich doch mit

if FormAnmeldung <> nil then ... abfragen können ob die Form da ist oder nicht ?

-> Weil bei mir sagt er Sie wäre da obwohl ich ja vorher Free gemacht habe ?

Gruss

Holger

[DeddyH]

Nein, Du musst entweder FreeAndNil verwenden oder den Objektzeiger selbst entwerten.

[HolgerCW]

So ???

FormAnmeldung <> FreeAndNil;

[DeddyH]

Entweder

Delphi-Quellcode:

FormAnmeldung.Free;
FormAnmeldung := nil;

oder
FreeAndNil(FormAnmeldung);