Chinaunix首页 | 论坛 | 博客
  • 博客访问: 198054
  • 博文数量: 99
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 1045
  • 用 户 组: 普通用户
  • 注册时间: 2014-07-15 14:24
文章分类
文章存档

2015年(9)

2014年(90)

我的朋友

分类: Web开发

2014-08-29 15:57:41

    实现类似于VB中Doevents函数的功能
  在Delphi中没有类似于VB中的Doevents函数,这样,有的时候,我们将无法使Windows响应多个同时发生的事件,怎么解决这一 问题?其实,你可以通过调用Application的ProcessMessage来完成类似VB中Doevents函数的功能。
  格式整数输出
  当比较大的数字输出时会显得不易阅读时,我们可在Delphi中通过如下办法显示带分节号的数字:×××××.Caption=FormatFloat(例:524,667,500)。
  制作丰富多彩的标签
  Delphi只提供了简单的标签,能不能在标签中有不同的字体、不同的颜色呢?回答是肯定的,并且不需使用第三方控件,我们只要巧妙地利用 Delphi自己提供的TRichEdit就可以了。首先将TRichEdit控件的边框清 除:RichEdit1.BorderStyle:=bsNone;同时设置只读属性为真:RichEdit1.ReadOOnly:=True;然后, 你利用Write之类的软件制作好RichText格式的文本,通过以下语句就可以显示出来了:
  RichEdit1.PlainText:=False;
  RichEdit1.Lines.LoadFrom(′c: est.rtf′);
  在编译时获得提示
  在Delphi 2.0中,编译时,可以让编译器告诉我们一些提示,但因一些特殊需要,我们必须在指定的代码段写入Delphi提示,怎么办?请参考如下的程序:
  {HINTON}
  procedureTform1.Button1Click(Sender:TObject);
  var
  X:integer;
  begin
  end;
  {HINTOFF}
阅读(459) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~