ListBox søg

Tags:    delphi

Hej udviklere,

Jeg har en ListBox med nogle navne, men den må ikke indeholde det samme navn flere gange. Jeg har prøvet med Følgende kode:

var X: integer;
begin
X := Pos(Edit1.Text, ListBox1.Items.Text);
if X <> 0 then
begin


Mit problem er at hvis jeg f.eks skriver i min edit1 Hans Micheal og der i min ListBox står Hans Micheal Jensen vil jeg ikke kunne indskrive navnet. Kan man ikke få den til at sammenligne hele strengen?


På forhånd tak for hjælpen


Mvh


Anders



3 svar postet i denne tråd vises herunder
2 indlæg har modtaget i alt 2 karma
Sorter efter stemmer Sorter efter dato
Kan du ikke bare bruge :

if (Edit1.Text=ListBox1.Items.Text) then .....

MvH

Stefan Svensson
http://fusket.frac.dk



User
Bruger #67 @ 29.09.04 12:36
Hej udviklere,

Jeg har en ListBox med nogle navne, men den må ikke indeholde det samme navn flere gange. Jeg har prøvet med Følgende kode:

var X: integer;
begin
X := Pos(Edit1.Text, ListBox1.Items.Text);
if X <> 0 then
begin


Mit problem er at hvis jeg f.eks skriver i min edit1 Hans Micheal og der i min ListBox står Hans Micheal Jensen vil jeg ikke kunne indskrive navnet. Kan man ikke få den til at sammenligne hele strengen?


På forhånd tak for hjælpen


Mvh


Anders


if ListBox1.Items.IndexOf(Edit1.Text) = -1 then
ListBox1.Items.Add(Edit1.Text);

??

/Lars



Kan du ikke bare bruge :

if (Edit1.Text=ListBox1.Items.Text) then .....

MvH

Stefan Svensson
http://fusket.frac.dk



Nej det virker ikke!

Mvh


Anders



t