Adressverletzung?

[DeddyH]

Es ist die Zeile fMain.Show; fMain ist zu diesem Zeitpunkt noch gar nicht erzeugt worden.

[fortuneNext]

Oh man... vielleicht sollte ich mit dem Programmieren aufhören, so unfähig wie ich kann man doch eigentlich garnicht sein!
Vielen dank, plötzlich läuft alles perfekt, genau wie ich es mir gedacht hatte xD

Delphi-Quellcode:

procedure Tfload.Load;
var
  Regist: TRegistry;
begin
ProgBar_Load.Position := 60; 
If ParamStr(1) = '' then
begin
  ProgBar_Load.Position := 100;  
  Application.CreateForm(TfMain, fMain);   
  fLoad.Hide;
  fMain.Show;
end
else if StrToInt(ParamStr(1)) > 0 then
begin
  PasswordNumber := 'Password' + ParamStr(1);
  PathNumber := 'Path' + ParamStr(1);
  Regist := TRegistry.Create;
  Regist.RootKey := HKEY_LOCAL_MACHINE;
  Regist.OpenKeyReadOnly('SOFTWARE\FNAG Coorperation\FNAG Secret\1.0');
  RPassword := Regist.ReadString(PasswordNumber);
  Path := Regist.ReadString(PathNumber);
  Regist.CloseKey;
  Regist.Free;
  ProgBar_Load.Position := 100;
  Application.CreateForm(TfPW, fPW);    
  fLoad.Hide;
  fPW.Show;
end;
end;

Ich Create die Formen jetzt einfach nur noch bei Bedarf, unnötig beide zu Createn aber nur eine zu brauchen, oder?
Nochmals danke!