Bei den älteren Delphiversion D2 - D7 gibt es im Unterverzeichnis Demos ein sehr schönes Projekt zur Visualisierung von Quicksort, Bubblesort.
Schau's dir an; es lohnt sich.
Delphi-Quellcode:
// for i := 1 to 12000 do PFUI :-)
for i:= Low(aZahlen) to High(aZahlen) do
begin
aZahlen[i] := 0;
sZahlen[i] := 0;
end;