Listen vergleichen

[Fritzew]

Sowas

Delphi-Quellcode:

procedure TForm11.DoProcessloop;
var
   loop, indexInList: integer;
begin
   for i := vProzessID.Count - 1 downto 0 do
      begin
         indexInList := vProcList.IndexOf(vProzessID[loop].ID);

         if indexInList >= 0 then
            begin
            // Wir haben den Procces gefunden
            // Mach was damit

            end
         else
            begin
         // Der Process ist nicht mehr in der Processlist
         // Mach was
         // zb Löschen
        // vProzessID.delete(loop);
            end;

      end;
end;