Combobox String Finden und Selektieren

[Knotti2005]

Wenn ich mein Programm beende wird der String in eine Ini Datei geschrieben. Nun möchte ich das bein Starten des Programmes der String gelesen und dann mit Items aus einer Combobox verglichen und selektiert wird.

Wie erreiche ich das?


Laden???

Delphi-Quellcode:

       form1.ComboBox1.Items.? := (ini. ReadString('Tapi', 'Gerät', form1.ComboBox1.items.?));

Speichern tu ich mit

Delphi-Quellcode:

ini.WriteString('Tapi','Gerät',form1.Combobox1.Text);

[Lannes]

Hallo,

wenn die Items der Combobox in der Reihenfolge nicht verändert werden,
brauchst Du nur den ItemIndex in der ini speichern, der dann beim Laden wieder gesetzt wird.

Ansonsten wird dir

Delphi-Quellcode:

ComboBox.Items.IndexOf('Eintrag')

weiterhelfen.

[Knotti2005]

Also so speichere ich jetzt

Delphi-Quellcode:

      ini.WriteString('Tapi','Gerät',form1.Combobox1.Text);  //Gerätenamen
      ini.WriteInteger('Tapi','Gerätindex',form1.ComboBox1.ItemIndex-1);  //Index

Laden tu ich so

Delphi-Quellcode:

       form1.Combobox1.Text:=(ini.ReadString('Tapi', 'Gerät', Combobox1.Text));

Verbesserungen erwünscht...

[Lannes]

Hallo,

wie gesagt, es reicht wenn nur der ItemIndex(der Index des selectierten Items) gespeichert wird,
vorrausgesetzt das die Items unveränderlich sind.
Dann ist es unnötig den "Gerätenamen" zu speichern.
Außerdem ist das -1 hinter ItemIndex nicht erforderlich, -1 brauchst Du nur wenn auf Count zugegriffen wird.

Delphi-Quellcode:

ini.WriteInteger('Tapi','Gerätindex',form1.ComboBox1.ItemIndex);

Wieder selectieren kannst Du das Item in der ComboBox dann mit:
//-1 als Defaultwert, also kein Item selectiert, falls das Lesen fehlschlägt.

Delphi-Quellcode:

Form1.ComboBox1.ItemIndex := ReadInteger('Tapi','Gerätindex',-1);