Hallo,
ich habe folgendes Problem.
Ich möchte dem Stringgrid 14 Zufallszahlen zuweisen.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
randomize;
spalte:= 7;
zeile := 2;
for y:=0 to (zeile -1) do
begin
for x:=0 to (spalte-1) do
begin
i:=random(100)+1;
Form1.StringGrid1.Cells[x,y]:= IntToStr(i);
end;
end;
end;
dies Funktioniert ja supa, dass Ding ist jetzt nur,
1. es dürfen keine Doppelten Zahlen erscheinen.
2. Die Zahlen mussen nach der Größe sortiert werden.
Hoffe ihr könnt mir helfen
mfg
Chris
[edit=Phoenix]Delphi-Tags ein- und die ganzen unnötigen B-Tags ausgefügt. Das nächste mal bitte selber auf die Delphi-Tags achten. Danke. Mfg, Phoenix[/edit]