| 订阅 | 在线投稿

分享

2006-12-16 17:27:50  编辑来源:互联网  国际版  评论

 

 

本文为【Delphi使用经验五则】的汉字拼音对照版显示拼音

　　Delphi使shi用yong经jing验yan五wu则ze

　　

　　1？实shi现xian类lei似si于yuVB中zhongDoevents函han数shu的de功gong能neng

　　在zaiDelphi中zhong没mei有you类lei似si于yuVB中zhong的deDoevents函han数shu，这zhe样yang，有you的de时shi候hou，我wo们men将jiang无wu贩fanㄊ？indows响xiang应ying多duo个ge同tong时shi发fa生sheng的de事shi件jian，怎zen么me解jie决jue这zhe一yi问wen题ti?其qi实shi，你ni可ke以yi通tong过guo调tiao用yongApplication的deProcessMessage览lan完wan成cheng像xiangVB中zhongDoevents函han数shu的de功gong能neng。

　　2？格ge化hua整zheng数shu输shu出chu

　　当dang比bi较jiao大da的de数shu字zi输shu出chu时shi会hui显xian得de不bu易yi阅yue读du。这zhe时shi我wo们men可ke在zaiDelphi中zhong通tong过guo如ru下xia贩fan法fa显xian示shi带dai分fen节jie号hao的de数shu字zi：×××××.Caption=FormatFloat(洌lie′，524667500)。

　　3？制zhi作zuo丰feng富fu多duo彩cai的de标biao签qian

　　在zaiDelphi只zhi提ti供gong了le简jian单dan的de标biao签qian，能neng不bu能neng在zai标biao签qian中zhong有you不bu同tong的de字zi体ti，不bu同tong的de颜yan色se呢ne?回hui答da是shi肯ken定ding的de，并bing且qie用yong不bu着zhe第di三san方fang提ti供gong的de控kong件jian，我wo们men只zhi要yao巧qiao妙miao的de利li用yongDelphi自zi己ji提ti供gong的deTRichEdit就jiu可ke以yi了le。首shou首shou先xian将jiangTRichEdit控kong件jian的de边bian框kuang清qing除chu?RichEdit1.BorderStyle：=bsNone；同tong时shi设she置zhi只zhi读du属shu性xing为wei真zhen：RichEdit1.ReadOOnly:=True；然ran后hou，你ni利li用yongWrite之zhi类lei的de软ruan件jian制zhi作zuo好haoRichText格ge式shi的de文wen本ben，通tong过guo以yi下xia语yu句ju就jiu可ke以yi显xian示shi出chu来lai了le：

　　RichEdit1.PlainText:=False;

　　RichEdit1.Lines.LoadFrom(′c:\test.rtf′)；

　　

　　

　　

　　4？在zai编bian译yi时shi获huo得de提ti示shi

　　在zaiDelphi 2.0中zhong，编bian译yi时shi，可ke以yi让rang编bian译yi器qi告gao诉su我wo们men一yi些xie提ti示shi，但dan因yin一yi些xie特te?需xu要yao，我wo们men只zhi要yao在zai指zhi定ding的de代dai码ma段duan需xu要yaoDelphi这zhe样yang的de提ti示shi，怎zen么me办ban?请qing参shen考kao如ru下xia的de程cheng序xu：

　　{$HINTON}

　　procedureTform1.Button1Click(Sender:TObject);

　　var

　　X:integer;

　　begin

　　end;

　　{$HINTOFF}

　　5？确que定ding刚gang才cai用yong鼠shu标biao击ji了le哪na一yi个ge对dui象xiang

　　在zaiWindows95中zhong，鼠shu标biao的de右you键jian起qi了le很hen大da的de作zuo用yong，但dan在zaiDelphi中zhong，对dui于yu右you键jian的de褂gua没mei共gong还huan挥hui行xing，怎zen样yang才cai能neng知zhi道dao刚gang才cai鼠shu标biao右you击ji的de对dui象xiang名ming称cheng呢ne?首shou先xian建jian立li一yi个gepopmenu，然ran后hou以yi下xia的de代dai码ma就jiu可ke以yi告gao诉su你ni?才cai右you击ji的de对dui象xiang名ming称cheng：

　　PopupMenu1.PopupComponent.ClassName。【原文】

 

 

 

Delphi使用经验五则 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。