Chinaunix首页 | 论坛 | 博客
  • 博客访问: 14490147
  • 博文数量: 5645
  • 博客积分: 9880
  • 博客等级: 中将
  • 技术积分: 68081
  • 用 户 组: 普通用户
  • 注册时间: 2008-04-28 13:35
文章分类

全部博文(5645)

文章存档

2008年(5645)

我的朋友

分类:

2008-04-28 20:47:12

下载本文示例代码
  1?实现类似于VB中Doevents函数的功能   在Delphi中没有类似于VB中的Doevents函数,这样,有的时候,我们将无贩ㄊ?indows响应多个同时发生的事件,怎么解决这一问题?其实,你可以通过调用Application的ProcessMessage览完成像VB中Doevents函数的功能。   2?格化整数输出   当比较大的数字输出时会显得不易阅读。这时我们可在Delphi中通过如下贩法显示带分节号的数字:×××××.Caption=FormatFloat(洌′,524667500)。   3?制作丰富多彩的标签   在Delphi只提供了简单的标签,能不能在标签中有不同的字体,不同的颜色呢?回答是肯定的,并且用不着第三方提供的控件,我们只要巧妙的利用Delphi自己提供的TRichEdit就可以了。首首先将TRichEdit控件的边框清除?RichEdit1.BorderStyle:=bsNone;同时设置只读属性为真:RichEdit1.ReadOOnly:=True;然后,你利用Write之类的软件制作好RichText格式的文本,通过以下语句就可以显示出来了:   RichEdit1.PlainText:=False;   RichEdit1.Lines.LoadFrom(′c:\test.rtf′);            4?在编译时获得提示   在Delphi 2.0中,编译时,可以让编译器告诉我们一些提示,但因一些特?需要,我们只要在指定的代码段需要Delphi这样的提示,怎么办?请参考如下的程序:   {$HINTON}   procedureTform1.Button1Click(Sender:TObject);   var   X:integer;   begin   end;   {$HINTOFF}   5?确定刚才用鼠标击了哪一个对象   在Windows95中,鼠标的右键起了很大的作用,但在Delphi中,对于右键的褂没共还挥行,怎样才能知道刚才鼠标右击的对象名称呢?首先建立一个popmenu,然后以下的代码就可以告诉你?才右击的对象名称:   PopupMenu1.PopupComponent.ClassName。   1?实现类似于VB中Doevents函数的功能   在Delphi中没有类似于VB中的Doevents函数,这样,有的时候,我们将无贩ㄊ?indows响应多个同时发生的事件,怎么解决这一问题?其实,你可以通过调用Application的ProcessMessage览完成像VB中Doevents函数的功能。   2?格化整数输出   当比较大的数字输出时会显得不易阅读。这时我们可在Delphi中通过如下贩法显示带分节号的数字:×××××.Caption=FormatFloat(洌′,524667500)。   3?制作丰富多彩的标签   在Delphi只提供了简单的标签,能不能在标签中有不同的字体,不同的颜色呢?回答是肯定的,并且用不着第三方提供的控件,我们只要巧妙的利用Delphi自己提供的TRichEdit就可以了。首首先将TRichEdit控件的边框清除?RichEdit1.BorderStyle:=bsNone;同时设置只读属性为真:RichEdit1.ReadOOnly:=True;然后,你利用Write之类的软件制作好RichText格式的文本,通过以下语句就可以显示出来了:   RichEdit1.PlainText:=False;   RichEdit1.Lines.LoadFrom(′c:\test.rtf′);            4?在编译时获得提示   在Delphi 2.0中,编译时,可以让编译器告诉我们一些提示,但因一些特?需要,我们只要在指定的代码段需要Delphi这样的提示,怎么办?请参考如下的程序:   {$HINTON}   procedureTform1.Button1Click(Sender:TObject);   var   X:integer;   begin   end;   {$HINTOFF}   5?确定刚才用鼠标击了哪一个对象   在Windows95中,鼠标的右键起了很大的作用,但在Delphi中,对于右键的褂没共还挥行,怎样才能知道刚才鼠标右击的对象名称呢?首先建立一个popmenu,然后以下的代码就可以告诉你?才右击的对象名称:   PopupMenu1.PopupComponent.ClassName。 下载本文示例代码


Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则Delphi使用经验五则
阅读(108) | 评论(0) | 转发(0) |
0

上一篇:Delphi中动画设计

下一篇:用Delphi设置墙纸

给主人留下些什么吧!~~