Quicksort: Rekursiver Aufruf funktioniert nicht!

[simonator11]

Okay, ich habe jetzt den Code ausgelagert in eine andere Prozedur (TForm1.Quicksort). Nun habe ich ein Problem mit der Deklaration - Im Class habe ich es als procedure Quicksort deklariert. Die Fehlermeldung lautet: ,,Error: function header doesn't match any method of this class "Quicksort(LongInt;LongInt);" ".
Muss ich den Quicksort vielleicht doch in public oder private deklarieren?