Registriert seit: 18. Aug 2003
648 Beiträge
|
INI Problem
13. Mai 2004, 11: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
|
|
Zitat
|