Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Listbox nach Text durchsuchen

    Delphi
    by Matze, 12. Dez 2009
  Willst du mich veräppeln? :gruebel:
  Natürlich hat eine ListBox die Eigenschaft Items und der Code oben funktioniert 1:1, nur dass du "TStringList" durch "TListBox" ersetzen musst.
  
  function InPlayList(Playlist: TListBox; VideoName: string): Boolean;
  var
  i: Integer;
  begin
  Result := false;
  
  for i := 0 to Playlist.Count - 1 do
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Listbox nach Text durchsuchen

    Delphi
    by Matze, 12. Dez 2009
  Hallo,
  
  ich verstehe überhaupt nicht, was dein Code macht. Wenn der aktuell betrachtete Playlist-Eintrag nicht dem Dateiname im OpenDialog entsprichst, fügst du den Dateipfad hinzu, auch wenn dieser gegen Ende in der Playlist stehen könnte.
  
  Ich würde das so irgendwie lösen:
  function InPlayList(Playlist: TStringList; VideoName: string): Boolean;
  var
  i: Integer;
  begin
  Result := false;