Hi,
dies ist mein erstes Tutorial und ich hoffe, dass es leicht verständlich ist.
1. Was sind INI's
2. Welche Vorteile haben INI's
3. Wie kann ich Einstellungen in INI's speichern
4. Wie kann ich Einstellungen aus INI's lesen
_______________________
Was sind INI's ?
INI's sind Dateien, um viele Einstellungen in einer Datei zu speichern.
Welche Vorteile haben INI's ?
-Können viele Einstellungen speichern
-Sind übersichtlich
-Viel mehr
Welche Nachteile haben INI's ?
-Haben laut S2B nur eine begrenzte Größe
-Können bei sehr vielen Einstellungen langsam werden
Wie kann ich Einstellungen in INI's speichern?
Das kommt ganz darauf an, was man speichern will.
Wenn wir die Position Left und Top von einer Form speichern wollen, müssen wir den Befehl WriteInteger verwenden.
Das geht so (In die Uses-Klausel muss IniFiles eingefügt werden):
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
//TIniFile wird geladen
with TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'data.ini') do
try
//Top wird geschrieben, Left wird geschrieben
WriteInteger('Position', 'TOP', Form1.Top);
WriteInteger('Position', 'Left', Form1.Left);
finally
//Ini wird freigegeben
Free;
end;
end;
Ein Edit kann man so schreiben:
WriteString('Text', 'Edit1', Edit1.Text);
Wie kann ich das ganze jetzt wieder laden?
Das geht fast genauso:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
//TIniFile wird geladen
with TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'data.ini') do
try
//Top wird geladen, Left wird geladen
Form1.Top := ReadInteger('Position', 'TOP', 0);
Form1.Left := ReadInteger('Position', 'Left', 0);
finally
//Ini wird freigegeben
Free;
end;
end;
Das Editfeld laden geht so:
Edit1.Text := ReadString('Text', 'Edit1', '');
Das wars für heute.
Morgen oder Übermorgen gibts die Fortsetzung wie man z.B. speichern kann ob die Checkbox gecheckt ist.