Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#2

Re: Nur bestimmte Dateien eines Ftp Ordner anzeigen

  Alt 11. Jul 2005, 18:45
Hier ein Beispiel zum löschen von Dateinamen aus der Liste.

Delphi-Quellcode:
// alle Dateien löschen, die .exe oder .dll beinhalten
procedure CleanList(list:TStrings);
var
   i : integer;
begin
   // Wichtig: vom Ende zum Anfang löschen
   for i:=list.count-1 downto 0 do
   begin
      if (Pos(list[i], '.exe')>0) or (Pos(list[i], '.dll')>0) then
         list.Delete(i);
   end;
end;

  CleanList(CheckListBox1.Items);
Andreas
  Mit Zitat antworten Zitat