Access violation

[capo]

Hallo..
wißt ihr was diese Fehlermeldung zu bedeuten hat:
Testumgebung war ein Windows 2000 Prof.Server
Access violation at address 005BC526 in module 'Project1.exe'. Read of address 00000000. Beim zweiten Programmstart ist der Fehler weg.

Der Fehler hat evtl. damit zu tun:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  shellfolder := GetShellFolder(CSIDL_COMMON_APPDATA);
  sExePath := (shellfolder + '\TEST\');
  if not DirectoryExists(shellfolder + '\TEST') then begin
    createDir(shellfolder + '\TEST\');
    StringGrid1.savetoCSV(shellfolder + '\TEST\db.csv');
    Memo2.Lines.SaveToFile(shellfolder + '\TEST\stat.ini');
  end

  else

Ich will beim Programmstart den Ordner und die Dateien erzeugen (es geht immer noch um mein Vista/Ini Problem.

gruss vom capo

[mirage228]

Hi,

Also die Fehlermeldung deutet auf eine Nullzeigerdereferenzierung hin, also irgendwo im Code versuchst du auf eine Variable zuzugreifen, die zu diesem Zeitpunkt = nil ist.

mfG
mirage228

[capo]

Okay...danke.
Kann man das sonst so machen, ich meine das erstellen des Ordners und der Dateien?
gruss vom capo

[mirage228]

Zitat von capo:

Kann man das sonst so machen, ich meine das erstellen des Ordners und der Dateien?
gruss vom capo

Hey,

Ja sieht schon ganz okay aus. Nur, wozu belegst Du die sExePath Variable, wenn Du danach den Pfad eh wieder manuell zusammenbaust?

Du könntest ggf. noch das Ergebnis von CreateDir() abfangen, falls es da einen Rückgabewert gibt - könnte ja sein, dass das Erstellen des Ordners fehlschlägt (aus welchem Grund auch immer).

mfG
mirage228

[capo]

Zitat:

Ja sieht schon ganz okay aus. Nur, wozu belegst Du die sExePath Variable, wenn Du danach den Pfad eh wieder manuell zusammenbaust? Wink

stimmt, du hast recht, hatte ich rausgenommen weil ich dachte, dass der Fehler damit was zu tun hat
Danke für den CreateDir() Tip
gruss capo