array sortieren

[marcel55555]

Ich hab hier ein Problem mit meinem array. Das array ist mit 15 Zufallszahlen gefüllt, und ich würd die gerne sortieren. Kann mir vielleicht jemand dabei helfen?

Delphi-Quellcode:

procedure TForm1.btnZahlenZufall1Click(Sender: TObject);
var
d,c,i:integer;
b:array[0..20] of integer;
begin
randomize;
b[0]:=0;
for c:=1 to 15 do
 begin
  b[c]:=random(90+1);
  for d:=0 to c-1 do
   begin
    while b[c]=b[d] do
    b[c]:=random(90+1);
   end;
  end;
  //Hier würd ich die Zahlen gern sortieren
  for i:=0 to 4 do
  sgMeineZahlen1.cells[i,0]:=IntToStr(b[i+1]);
  for i:=0 to 4 do
  sgMeineZahlen1.cells[i,1]:=IntToStr(b[i+6]);
  for i:=0 to 4 do
  sgMeineZahlen1.cells[i,2]:=IntToStr(b[i+11]);
end;