Absturz beim Programmstart unter Window NT

[mjenke]

@sakura:

Hier der Quelltext aus der dpr zwischen begin und end:

Code:

begin
  Application.Initialize;
  Application.Title := 'Datenpflegeprogramm ATV-Branchenführer 2001';
  Application.CreateForm(TfrmATVMain, frmATVMain);
  Application.CreateForm(TdatModul, datModul);
  Application.CreateForm(TfrmKategorien, frmKategorien);
  Application.CreateForm(TfrmDBOptions, frmDBOptions);
  Application.CreateForm(TfrmLaender, frmLaender);
  Application.CreateForm(TdatModulAusgabe, datModulAusgabe);
  Application.CreateForm(TfrmSuchDialog, frmSuchDialog);
  Application.CreateForm(TfrmAboutBox, frmAboutBox);
  Application.CreateForm(TfrmLaufendeNummern, frmLaufendeNummern);
  Application.CreateForm(TfrmKorrekrurbelicht, frmKorrekrurbelicht);
  Application.CreateForm(TfrmQRListe, frmQRListe);
  Application.CreateForm(TfrmAdrEdit, frmAdrEdit);
  Application.CreateForm(Tform99, form99);
  Application.Run;
end.

@r_kerber:
Ja, ich greife in FormActivate auf die Registry zu. Allerdings komme ich gar nicht soweit, dass das Registry-Objekt erzeugt wird. Ich fliege vorher schon raus.
Der Beginn der FormActivate sieht folgendermassen aus:

Code:

procedure TfrmATVMain.FormActivate(Sender: TObject);
var regDBOptions : TRegistry;
begin
   showMessage('Begin Activate');     // Debug, M. Jenke, 24.06.03
   If Not isInitialized Then

Ich komme aber, wie gesagt, nicht mal bis zu showMessage...


Matthias