![](https://img-blog.csdnimg.cn/20201014180756754.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
LMin_HDS
这个作者很懒,什么都没留下…
展开
-
Delphi 中生成指定范围不重复的随机数
刚开始学习Dephi,写这个相当于学习笔记,有不正确的地方,请各位大神多多指教生成指定范围的不重复大的随机数 指定随机数的范围,生成不重复的随机数while si begin randSum[si]:= Random(maxSum-minSum)+minSum; //maxSu原创 2016-11-23 16:58:35 · 6138 阅读 · 1 评论 -
Delphi中的var、constant、out的区别
(1)var修饰符添加var 是地址传递,会修改原有的变量vars: string;beginS := 'Hello';ChangeSVar(s);ShowMessage(S);end;// ChangeSVar 定义procedure TForm1.ChangeSVar(var A: string);begi转载 2016-12-23 15:07:43 · 4690 阅读 · 0 评论