L liugaohui Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-08 #1 randomize; x:=random(1000);1、请问random随机数的种子怎么手动设置？ 2、在进行randomize后如何得到随机数的种子？3、谢谢回复
H hanpengshan_00 Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-08 #2 UnitSystemvar RandSeed: LongInt = 0; --->这个
L liugaohui Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-08 #3 hanpengshan_00,谢谢，能否详细说说？
叶 叶不归 Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-08 #4 上面的说的很清楚了丫RandSeed就是种子1、请问random随机数的种子怎么手动设置？ -- RandSeed := 16;2、在进行randomize后如何得到随机数的种子？-- Randomize;-- ShowMessage(IntToStr(RandSeed));3、谢谢回复 --不客气
上面的说的很清楚了丫RandSeed就是种子1、请问random随机数的种子怎么手动设置？ -- RandSeed := 16;2、在进行randomize后如何得到随机数的种子？-- Randomize;-- ShowMessage(IntToStr(RandSeed));3、谢谢回复 --不客气
L liugaohui Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-08 #5 Randomize;ShowMessage(IntToStr(RandSeed));richedit1.Clear; for i := 1 to 20 do begin j:= Random(30); richedit1.Lines.Add(inttostr(j)); end;我的计算机随机数种子每次运行都是10689520？delphi2009和d7的种子不一样？是不是随机数的算法有变化？
Randomize;ShowMessage(IntToStr(RandSeed));richedit1.Clear; for i := 1 to 20 do begin j:= Random(30); richedit1.Lines.Add(inttostr(j)); end;我的计算机随机数种子每次运行都是10689520？delphi2009和d7的种子不一样？是不是随机数的算法有变化？
李 李翔鹏 Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-09 #6 RandSeed 在哪赋的值？randomize; x:=random(1000); //这个1000就是种子阿？
W wql Unregistered / Unconfirmed GUEST, unregistred user! 2009-01-09 #7 我自己的酸法,每次运行X都不一样:randomize; for x:=1 to 50+random(50) do random(50);x:=random(1000);
