Einzelnen Beitrag anzeigen

Mobby

Registriert seit: 11. Mai 2006
16 Beiträge
 
Delphi 5 Standard
 
#6

Re: Ordnen vo Zahlen

  Alt 19. Mai 2006, 18:55
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...
Ehre wem Ehre gebürt.
  Mit Zitat antworten Zitat