Wo ist der Fehler? (ini datei auslesen)

[Amo]

In Settings.ini zu schreiben klappt wunderbar, nur auslesen kann ich nicht. hier ist mein code bei OnFormCreate:

Delphi-Quellcode:

  try
  SettingsIni := TIniFile.Create(
              extractfilepath(ParamStr(0)+'Settings.ini'));
  SetName.Text := SettingsIni.ReadString('name',
                    'name','');
  SetPW1.Text := SettingsIni.ReadString('password',
                  'password','');
  SetPW2.Text := SetPW1.Text;
  SetReason.Text := SettingsIni.ReadString('reason',
                      'reason','');
  except
  messagedlg('Settings could not be loaded!',mterror,
                  [mbOK],0);
  end;
  SettingsIni.Free;

Was passiert? -Die Eingabefelder bleiben leer, obwohl die werte in der inidatei richtig gespeichert sind!

danke im Voraus :-)

[alcaeus]

Moin,

wie sieht die Ini-Datei aus?
So:

Code:

[name]
name=foobar
[password]
password=foobar
[reason]
reason=foobar

Wenn nicht, dann solltest du dir mal die Hilfe zu TIniFile.ReadString() ansehn. ;)

Greetz
alcaeus

[SirThornberry]

um den fehler zu finden müsste man den speichern-source auch haben. Denn offenbar stimmt der Speichernsource und der Ladensource nicht überein in bezug auf das laden.

[Amo]

Hier die gesamte INI-Datei:

[name]
name=Amaury
[reason]
reason=cause i am tnt
[password]
password=12345

[Amo]

Und hier der Speichern-Source :wink:

Delphi-Quellcode:

try
  SettingsIni := TIniFile.create(
    ExtractFilePath(ParamStr(0)) + 'Settings.ini');
  SettingsIni.WriteString('name','name',SetName.Text);
  if SetPW1.Text = SetPw2.Text then
  SettingsIni.WriteString('password','password',SetPW1.Text)
  else messagedlg('Please verify the entered passwords!',
                        mterror, [mbOK],0);
  SettingsIni.WriteString('reason','reason',SetReason.Text);
  messagedlg('Settings saved successfully!',
                mtinformation, [mbOK],0);
  except
  messagedlg('Settings could not be saved!',
                        mterror, [mbOK],0);
  end;
  SettingsIni.Free;

[SirThornberry]

ich denk ich hab den Fehler:

Delphi-Quellcode:

 SettingsIni := TIniFile.Create( 
              extractfilepath(ParamStr(0)+'Settings.ini'));

du fügst an den aktuellen ExePfad "settings.ini" an und extrahierst dann davon den Pfad. Du hast wohl die eine Klammer falsch gesetzt.
richtig:

Delphi-Quellcode:

 SettingsIni := TIniFile.Create( 
              extractfilepath(ParamStr(0))+'Settings.ini');

Beim speichern hast du die klammer richtig gesetzt, daher klappt es dort auch.

[Nicolai1234]

Müsste es nicht statt

Delphi-Quellcode:

SettingsIni := TIniFile.Create(extractfilepath(ParamStr(0)+'Settings.ini'));

eher

Delphi-Quellcode:

SettingsIni := TIniFile.Create(extractfilepath(ParamStr(0))+'Settings.ini');

heißen?

Edit: Mist, ich zu langsam und roter Kasten im Urlaub...

[Ralf Kaiser]

Hallo,

diese Zeile:

Delphi-Quellcode:

  SettingsIni := TIniFile.Create(extractfilepath(ParamStr(0)+'Settings.ini'));

sollte so lauten:

Delphi-Quellcode:

  SettingsIni := TIniFile.Create(extractfilepath(ParamStr(0))+'Settings.ini');

Bitte die Position der Klammern beachten! Du hattest den gesamten Ausdruck "Paramstr(0)+Settings.ini" geklammert. Du wlltest allerding den Pfad von ParamStr(0) haben und dann "Settings.ini" dranhängen.

Ciao,
Ralf

[Amo]

cooles echo :lol:

also die datei speichert er ja problemlos ab, aber da der fehler ja immer alles mögliche sein kann, probiere ich es aus.

.
.
.

ich fasse es nicht :roll: es lag wirklich an dieser einen dähmlichen klammer...

Vielen Dank !!! :-)