In einer Listview Einträge makieren

[napsterxx]

Hey
sitz mal wieder vor so na Schranke xDD
Also folgendes:
Ich habe in einer Listbox alle Items, die sich auch in einr Listview befinden. Mit hilfe eines Edit-Feldes gebe ich nun den Suchbegriff ein. Danach klicke ich auf einen Button und ersucht. UIND er FINDET.^^
Dann will ich das der gefundene eintrag der Listbox auch in der Listview makiert wird. Ich habe z.B. nach Musik gesucht. Alle Einträge der Listview sind in der gleichen Reihenfolge wie in der Listbox. Suche ich jetzt nach "Linkin Park" findet er ein Lied in der Listbox aber wie makiere ich dieses nun in der Listview ich habe es so probiert.

Listview.ItemIndex := Listbox.ITems.IndexOf(Edit1.Text); << Geht nicht ...

EDIT:
Was ich nun Versucht habe ist alle Items aus Listview zu löschen, die NICHT dem Text vom Edit entsprechen.
In meiner Listview ist die erste Spalte "Interpret" also wird bei Edit1 der Interpret gesucht, aber es funktioniert nicht.

Delphi-Quellcode:

procedure TForm1.Button17Click(Sender: TObject);
var result, w,w1 : integer;
array1 : array [0..100000] of Integer;
begin
result := Listbox1.Items.Count-1;
for w := 0 to result do
  begin
    if not (listbox1.Items.Strings[w] = Edit1.Text) then
    begin
    w2 := w;
    Button18.Click;
    end;
  end;
end;

procedure TForm1.Button18Click(Sender: TObject);
begin
    listbox1.Items.Delete(w2);
    listbox6.Items.Delete(w2);
    listbox5.Items.Delete(w2);
    View.Items.Delete(w2);
    button17.click;
end;

[napsterxx]

kk habs endlich geschafft^^ aber eine andere Frage hätte ich noch:
wie kann ich sagen das es egal ist ob nun das Editfeld großbuchstaben hat oder nicht, denn wenn ich "Linkin Park" eingebe findet er 12 Lieder, und wenn ich "linkin park" eingebe keins.. wie ändere ich das?

[s-off]

Hallo,

probiere es mal mit UpperCase(Edit1.Text) = 'LINKIN PARK' oder mit LowerCase(Edit1.Text) = 'linkin park'

[napsterxx]

THX alles hat funktioniert

[napsterxx]

Kann jemand zur ersten Frage was sagen?

[Die Muhkuh]

Hi,

schau dir mal ListBox1.Selected an ;)

[napsterxx]

ich weiß ich rede von Listview

edit:
dachte du bist im Urlaub^^

[Die Muhkuh]

Zitat:

Zitat von napsterxx

ich weiß ich rede von Listview

edit:
dachte du bist im Urlaub^^

Ups sorry, hab immer ListBox gelesen :D Aber bei der Listview dürfte es sowas auch geben.

Ich bin schon im Urlaub, aber hier gibbet auch Internetanschluss :P

[napsterxx]

nein geht es nicht, ich habe es schon so probiert:

Delphi-Quellcode:

ListView.Items.Item[int].Selected := True;
ListView.Items.Item[int].Focused := True;
ListView.ItemIndex := 5;

Geht nicht ...

[bitsetter]

Hi,

hast du zum Schluss es mal mit

Delphi-Quellcode:

view.SetFocus

versucht?