Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#9

AW: Bug in QuickLib

  Alt 26. Dez 2020, 01:07
Der nächste Bug in dieser Komponente?

Delphi-Quellcode:
  sl := Quick.Process.GetProcessList;
  try
    sl.Sort;
    for var i := SL.Count - 2 downto 0
      if sl[i] = sl[i+1] then
        sl.Delete(i);
    //CodeSite.Send('TForm1.tsProcessListsShow: sl', sl);
    lstProcesses.Items.Assign(sl);
  finally
    sl.Free;
  end;
Ich weiß jetzt nicht wie diese Komponente intern arbeitet, aber eine StringListe lässt sich auch so sortieren und aufräumen.
Delphi-Quellcode:
sl.Sorted := True;
sl.Duplicates := dupIgnore;
sl.Text := sl.Text;
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (26. Dez 2020 um 01:12 Uhr)
  Mit Zitat antworten Zitat