Einzelnen Beitrag anzeigen

Larsi

Registriert seit: 10. Feb 2007
2.262 Beiträge
 
Delphi 2007 Professional
 
#1

ListView suchen

  Alt 28. Nov 2007, 15:14
hi,
wie kann ich in ner listview suchen(auch nach subitems-eiträgen) ich möchte dass das dann in ner anderen listview steht das suchergebnis!

hab das mit dem suchen schon so hinbekommen:
Delphi-Quellcode:
var gefunden: Boolean;
    i, iCnt: integer;
    l: TListItem;
begin
  gefunden := false;
  i := 0;
  while not gefunden and (i < Form3.ListView1.Items.Count) do
    begin
      if Form3.ListView1.Items[i].Caption = Edit1.Text then
        begin
          gefunden := true;
          //Erstellen eines neuen ListItems
          l := Form15.ListView1.Items.Add;
          //Zuweisung der Beschriftung
          l.Caption := Form3.ListView1.Items[i].Caption;
          //Kopieren aller SubItems
          for iCnt := 0 to Form3.ListView1.Items[i].SubItems.Count - 1 do
            l.SubItems.Add(Form3.ListView1.Items[i].SubItems[iCnt]);
        end;
      inc(i);
    end;
  if gefunden then
    Form15.ShowModal;
end;
aber wenn ich nach nem subitem suche findet der gar nichts!

MFG Lars W.
Ein Tag ohne Delphi ist ein verlorener Tag!

Homepage zu meinem neuen Programm: StreamZ
  Mit Zitat antworten Zitat