Ordnen vo Zahlen

[Mobby]

also...ich hab jetzt ein spiel...mau-mau...das kartenspiel...naja und jetzt bin ich dabei die karten in der listbox zu sortieren. ich hab mir gedacht da ich das nicht nach alphabet haben möchte sortiere ich nach zahlen...ich hab mit hilfe von :

Delphi-Quellcode:

procedure TForm1.sortierenClick(Sender: TObject);

var i: integer;

begin
  Ka7:=inttostr(1);
  Ka8:=inttostr(2);
  Ka9:=inttostr(3);
  KaD:=inttostr(4);
  KaK:=inttostr(5);
  Ka10:=inttostr(6);
  KaA:=inttostr(7);
  He7:=inttostr(8);
  He8:=inttostr(9);
  He9:=inttostr(10);
  HeD:=inttostr(11);
  HeK:=inttostr(12);
  He10:=inttostr(13);
  HeA:=inttostr(14);
  Pi7:=inttostr(15);
  Pi8:=inttostr(16);
  Pi9:=inttostr(17);
  PiD:=inttostr(18);
  PiK:=inttostr(19);
  Pi10:=inttostr(20);
  PiA:=inttostr(21);
  Kr7:=inttostr(22);
  Kr8:=inttostr(23);
  Kr9:=inttostr(24);
  KrD:=inttostr(25);
  KrK:=inttostr(26);
  Kr10:=inttostr(27);
  KrA:=inttostr(28);
  KaB:=inttostr(29);
  HeB:=inttostr(30);
  PiB:=inttostr(31);
  KrB:=inttostr(32);
  spieler_1.Sorted:=true;
  spieler_2.Sorted:=true;
  spieler_3.Sorted:=true;
end;

jeder karte eine zahl zugeordnet...nun ist die frage wie ich das nun sortieren kann...ich blick das einfach nicht...