uses
ShareMem;
type
TArray = array of Integer;
functionfun
阅读背景：
Delphi 获取不重复随机数《LceMeaning》
来源：互联网
分享到：
