Zitat von
Luckie:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Loop: Cardinal;
begin
for Loop := 0 to 31 do
Listbox1.Items.Add(IntToStr(Random(31)));
end;
Wo ist jetzt das Problem?
Eigentlich "Random(32)", da ja "0 <= X < (NICHT <
=) Range".
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel