问题1:Position表示进度条的当前位置,Step表示进度条每次前进的长度,Width表示进度条控件的长度。
问题5:首先在Uses中加入Clipbrd,
RichEdit1.CopyToClipboard;//复制
RichEdit1.CutToClipboard;//剪切
RichEdit1.PasteFormClipboard;//粘贴
RichEdit1.Undo;//取消
问题8:重载是对类的原有方法的扩展,当然,重新写一个方法也是可以的,不过,如果是构造函数或者析构函数之类的,重新写就很难保证没有遗漏一些细节的地方。而用重载的方法,只须加入继承说明inherited就解决了。因此,采用重载,即简单,又安全,也符合面向对象语言的封装性原则。
问题9:Num为整型变量
Num:=Query1.RecordCount;//取得记录总数
Num:=Random(Num);//产生随机数
Query1.First;//确保当前记录为第一条
Query1.MoveBy(Num);//移动记录指针
注意:以后别这么小气了,一个帖子居然提十个问题,而且才15分。切记,切记!