Liebes Forum,
als Neuling mit Delphi versuche ich es bei Euch um eine Antwort zu bekommen was ich falsch mache.
Ich möchte in eine INI Datei die letzte Eingestellte Sprache eintragen und weis leider beim besten
willen nicht wie ich das gebacken kriege.
Ich habe dsa TUT bem Delphi-Treff genommen und adaptiert.
Ich habe auch dort schon einen Beitrag um Hilfe geschrieben. Leider aber nicht die Hilfe bekommen
die ich mir erhoffte.
Ich habe folgenden Code geschrieben um die INI Datei zu schreiben:
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
const
Sektion='language';
Eintrag='last language';
var
ini: TIniFile;
filename: String;
begin
SiLang1.Language := ComboBox1.Items.Strings[ ComboBox1.ItemIndex ];
filename := ExtractFilePath(ParamStr(0)) + './ini/einstellungen.ini'; //???
ini := TIniFile.Create(filename);
try
ini.WriteString(Sektion,Eintrag,ComboBox1.Text);
finally
Ini.Free;
end;
und den Code um die Sprache wieder zum auslesen:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
const
Sektion='language';
Eintrag='last language';
var
ini: TIniFile;
filename: String;
begin
filename := ExtractFilePath(ParamStr(0)) + './ini/einstellungen.ini'; //???
ini := TIniFile.Create(filename);
ComboBox1.Text := Ini.ReadString('Sektion', 'Eintrag', 'Wert');
finally
ini.Free;
Bitte macht mich nicht fertig wenn ich es nicht verstehe, aber bei mir funktioniert es nicht.
Kann mir jemand von Euch hier aus dem Forum etwas behilflich sein ? Ich wäre sehr dankbar.
Herzliche Grüsse aus der Schweiz
Chris