Zitat von
snears:
...
Oder muss ich das so machen wie es oben steht?
Viele Wege führen zu einem Ziel. Nur, wenn du uns das Ziel nicht genau bekannt gibst, können wir dir auch nur schlecht den Weg dazu zeigen.
Eine Alternative ist die Inidatei. Hier ein anderes Beispiel:
1. Erzeuge eine Inidatei
2. Durchlaufe alle Controls und überprüfe ob es eine Combobox ist
3. Schreibe den Namen des gefundenen Controls und den Index in die Inidatei
4. Schliesse die Inidatei
Delphi-Quellcode:
var
i: Integer;
ini: TIniFile;
begin
ini:=TIniFile.create(deindateiname);
Try
for i:= 0 to ComponentCount -1 do
begin
if Components[i] is TComboBox then
Ini.WriteInteger('Settings',Components[i].Name, TComboBox(Components[i]).itemindex);
end;
finally
ini.Free;
end;
end;