J jhjs Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-18 #1 我忘记好像有一个函数能产生随机数据,有没有高手帮忙一下,谢谢!!!!!
贝 贝贝11 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-18 #4 var I: Integer; begin Randomize; for I := 1 to 50 do begin { Write to window at random locations } Canvas.TextOut(Random(Width), Random(Height), 'Boo!'); end; end;
var I: Integer; begin Randomize; for I := 1 to 50 do begin { Write to window at random locations } Canvas.TextOut(Random(Width), Random(Height), 'Boo!'); end; end;
C cg1120 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-18 #5 Randomsize;//先用这个函数初始化 rN:=random(9);
凡 凡雨飞雨 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-18 #7 Edit1.Font.Color:=random(35000);
S sthsm Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-18 #8 randomize; j:=random(x); 如果参数没指定,那么即 0 <= X < 1. 如果指定参数 即:0 <= X < Range