Thema: Delphi INI Problem

Einzelnen Beitrag anzeigen

Akut-Programming

Registriert seit: 18. Aug 2003
648 Beiträge
 
#1

INI Problem

  Alt 13. Mai 2004, 10:05
Also ich hatte mir ne Prozedur zum speichern meiner Einstellungen geschrieben - leider bekomme ich eine Zugriffsverletzung, wenn ich diese ausführen will.

Meine Prozedur:
Delphi-Quellcode:
procedure Tfrm_main.prcSaveSettings;
var
   ini: TIniFile;
   i: integer;
begin
     ini := ini.Create('settings.ini');
     try
       if s_SaveRes = 1
       then begin
            ini.WriteInteger('Resolution', 'Save', 1);
            ini.WriteInteger('Resolution', 'Height', frm_main.Height);
            ini.WriteInteger('Resolution', 'Width', frm_main.Width);
       end else
       begin
            ini.WriteInteger('Resolution', 'Save', 0);
            ini.WriteInteger('Resolution', 'Height', 466);
            ini.WriteInteger('Resolution', 'Width', 641);
       end;

       if frm_settings.cbStartMax.Checked
       then begin
            ini.WriteInteger('Start', 'StartMax', 1)
       end else
           ini.WriteInteger('Start', 'StartMax', 0);
       begin
       end;

       if frm_settings.rbShowAllTables.Checked
       then begin
            ini.WriteInteger('TableOptions', 'ShowAll', 1);
            ini.WriteInteger('TableOptions', 'ShowSelected', 0);
       end;

       if frm_settings.rbShowThisTables.Checked
       then begin
            ini.WriteInteger('TableOptions', 'ShowAll', 0);
            ini.WriteInteger('TableOptions', 'ShowSelected', 1);
       end;
       frm_settings.lbTables.Items.SaveToFile(APPPATH + TABLEFILE);
     finally
     ini.Free;
     end;
end;
Ich habe sie beim beenden der Anwendung aufgerufen. - Kann mir jemand beim beheben des Fehlers helfen???

Gruß,
Akut-Programming
be cool, be hot ... just be
  Mit Zitat antworten Zitat