问题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分。切记,切记!
问题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分。切记,切记!
解决方案 »
- 求一款好的硬盘检测工具。
- 封装的DLL怎样接收中文
- string 如何转换为 pchar ,用了strpcopy,说是:Incompatible types: 'String' and 'PAnsiChar'
- DELPHI 中怎样识别sql server数据库中的某个数据表中的字段是否为自动增长的.
- 怎样改变一个Image控件大小时保持另一个控件在图片上的位置不变?
- 李维的高效数据库系统篇电子书的下载
- 给我来点可用分吧,兄弟没有可用分了
- 用ADODataset1查询的结果<1时就报错!
- 怎么才能通过对方IP知道对方的NETBIOS?
- 关于TOOLBAR的送分问题。
- 动态弹出式窗口的解决办法?
- Delphi6下有个调用EJB的例子,谁跑起来了?有高分....
问题9:产生一个随机数random,query1.recno(randon),就抽出了一条