Zugriffsverletzung bei Adresse ' ' in Modul

[Rippo]

Delphi-Quellcode:

function RegPath: String;
begin
  Result := ExtractFileName(ChangeFileExt(ParamStr(0), '.ini'));
end;

procedure SaveFormSettings(frmKonfig : TfrmKonfig);
var
  RegIni: TRegIniFile;
begin
  RegIni := TRegIniFile.Create(RegPath);
  try
    RegIni.WriteInteger('Form', 'Color', frmKonfig.Color);
  finally
    RegIni.Free;
  end;
end;

procedure LoadFormSettings(frmkonfig: TfrmKonfig);
var
  RegIni: TRegIniFile;
begin
  RegIni := TRegIniFile.Create(RegPath);
  try
    frmKonfig.Color := RegIni.ReadInteger('Form', 'Color', frmKonfig.Color);
  finally
    RegIni.Free;
  end;
end;

was habe ich falsch gemacht?

[baumina]

RegPath liefert sicher keinen vollständigen Dateinamen inkl. Pfad. Aber das kannst dir ja auch ganz einfach im Debugger anzeigen lassen.

[Dalai]

Zitat:

Zitat von Rippo (Beitrag 1299059)

was habe ich falsch gemacht?

Zu schreiben, wo der Fehler genau auftritt.

MfG Dalai

[Rippo]

bei function tritt der fehler auf

[himitsu]

Ähhh, was/wo bitte?


PS: Und TRegIniFile und vorallem TRegistryIniFile sind eigentlich nur Komponenten zur "Abwärtskompatibilität", um ohne große Umbauten von INI auf Registry umzustellen, bzw. um sich nicht mit der Registry zu beschäftigen und das einfach billig wie eine TIniFile zu benutzen.
Für Neuentwicklungen würde sich die direkte Verwendung der TRegistry bestimmt besser anbieten.

[mkinzler]

Ich würde mich auch erst mal um den Fehler kümmern, den baumina sofort erkannt hat.

[Sir Rufo]

Zitat:

Zitat von Rippo (Beitrag 1299089)

bei function tritt der fehler auf

Es wäre zuckersüß, wenn du in ganzen Sätzen und zusammenhängend sagen könntest

• was für ein Fehler (STRG-C im Meldungsfenster, STRG-V hier im Forum)
• an exakt welcher Stelle

auftritt.

Auch wenn die Technik schon sehr weit fortgeschritten ist, aber wir können noch nicht in dein Hirn oder einfach so auf deinen Bildschirm schauen.

[DeddyH]

Wird denn auch eine gültige Formularinstanz übergeben?

[Rippo]

So

ich starte mein programm

wenn ich dann auf das formular klicke bekomme ich die fehlermeldung 'Zugriffsverletzung bei Adresse ...'
wenn ich es debugge kommt der fehler bei function ' Result := ...'

[DeddyH]

In welcher Funktion denn?