tstringlist probleme mit find/indexof..

[agm65]

also ich erklärs euch mal, ich hab 2 stringlisten

die eine (VehicleTypeKey) enthält ,pkw ,lkw & rad
dazu gibts in der stringliste2 (VehicleTypeDe) die entsprechenden namen der fahrzeuge.

jetzt möchte ich diese namen aus stringliste2 in einer combobox anzeigen lassen. mit den indexwerten die alle einträge aus stringlist1 haben (alle pkws).

deswegen dachte ich:

Delphi-Quellcode:

// also solange ich pkw als string in der liste1 habe nimm alle werte aus stringlist2 die den gleichen index haben

while VehicleTypeKey.indexof('pkw') <> -1 do
begin
combobox.Items.Add(VehicleTypeDe.strings[VehicleTypeKey.indexof('pkw') ]  );  
end;