Problem beim Laden mit Ini's

[ManuMF]

Das war jetzt ein bisschen Mischmasch

Delphi-Quellcode:

begin
  ForceDirectories(ExtractFilePath(ParamStr(0))+'Settings');
  with TiniFile.Create(ExtractFilePath(ParamStr(0))+'Settings\'+'config.dat') do //create iniFile
    try
      Form1.Width := ReadInteger('POSITION', 'WIDTH', 0); //load form settings
      Form1.Height := ReadInteger('POSITION', 'HEIGHT', 0); //load form settings
    finally
      Free;
    end;
end;

oder besser:

Delphi-Quellcode:

var ini: TIniFile;
begin
  ForceDirectories(ExtractFilePath(ParamStr(0))+'Settings');
  ini := TIniFile.Create(ExtractFilePath(ParamStr(0))+'Settings\'+'config.dat');
  with ini do
    try
      Form1.Width := ReadInteger('POSITION', 'WIDTH', 0); //load form settings
      Form1.Height := ReadInteger('POSITION', 'HEIGHT', 0); //load form settings
    finally
      Free;
    end;
end;

Gruß,
ManuMF