IndexOf - hvordan?

gange med nul :-))

Jeg forstår ikke helt dit spørgsmål... :(

Du vil finde en Titem fra en TListBox med IndeOf - og du har kun de sidste 5 tegn... er det korrekt forstået?

Okai... Hvis jeg har i min ListBox:

aaa.45645
aba.97483
aby.78437

Så ville jeg med:

ListBox.Items.IndexOf('aaa.45645') få tallet "0" (den position den er i ListBox'en)

Så hvis jeg kun kender de sidste 5 tegn (45645) - hvordan kan jeg så få funktionen til at virke alligevel, uden at skulle skrive 'aaa.'

prøv dette...

jeg har en Tbutton, en Tlistbox og en Tedit. Skriv de tegn du kender og tryk på knappen...

Skriv følgende kode i knappen OnClick Procedure...

procedure TForm1.Button1Click(Sender: TObject);
var
  i : integer;
begin
  for i := 0 to listbox1.items.count-1 do
  if pos(edit1.text,listbox1.items[i]) > 0 then
  listbox1.itemindex := i;
end;

...

skriv hurtigt tilbage hvis det virker

virker det?

Ved jeg ikke - jeg fandt på en løsning med at splitte det op i 2 listboxe..
men stik et svar, så får du pointsne

Men jeg synes lige du skulle prøve det i ligevel... :-))

I will :)

Godnat... og tak for points...