Aus dem Kopf getippselt und ungetestet irgendwie sowas:
Delphi-Quellcode:
var
i: Integer;
EntryNum: Integer;
EntryValue: string;
MyIni := TIniFile.Create(...);
try
// read number of entries
EntryNum := MyIni.ReadInteger('Liste', 'anzahleinträge', 0);
MyComboBox.Items.Clear;
MyComboBox.Items.BeginUpdate;
// add items
for i := 1 to EntryNum do
begin
EntryValue := MyIni.ReadString('Liste', IntToStr(i), '');
if ((EntryValue != '') and (Pos(EntryValue, MyEdit.Text) > 0)) then
MyComboBox.Items.Add(EntryValue);
end;
MyComboBox.Items.EndUpdate;
finally
FreeAndNil(MyIni);
end;
Um nicht laufend auf die Ini-Datei zugreifen zu müssen, kannst du diese einmalig in eine TStringList einlesen und daraus dann die ComboBox füllen.
Das Prinzip ist dabei das gleiche: Die StringList in einer Schleife durchgehen, Werte prüfen und ggf. hinzufügen.