315技术社区's Archiver

咨询客服QQ:604164

hgxlove 发表于 2008-5-6 15:22

Delphi的Hint入门指导

Delphi中使用提示是如此简单,只需将欲使用Hint的控件作如下设置:
  ShowHint := True;
  Hint := ‘提示信息’;
  不必写一行代码,相当方便。
  但有时我们又想自己定制提示的效果,使其看起来更美观更具个人特色,没关系,Delphi完全有办法让你写出自己喜欢的Hint效果。
  Delphi的Hint功能实现归类在Application类中,所以我们可以在Application类中看到数个关于Hint的属性,这些属性可以设置Hint窗口的颜色,停留时间,出现时间等,设置了这些属性,将对整个工程的Hint功能起到影响。这样做的好处当然是统一了Hint的风格,并且让其他类不必去理会Hint的实现。
  我们可以建一个简单的工程,并放一个按钮,将按钮的ShowHint设为True,再对Hint设一个值。运行程序,当光标指到按钮上时,便会出现一个提示窗口。
  但如果我们在主窗口的创建事件中写下:

  procedure TForm1.FormCreate(Sender: TObject);
  begin
  Application.ShowHint := False;
  end;
  这些再运行程序,就不再有提示出现了,由此可知Application的ShowHint控制整个工程的Hint是否显示。
  如果你对于平常所见的Hint窗口的颜色感到厌烦,那么可以设Application的HintColor为其他颜色。但此时有一个问题,如果HintColor设为黑色,则提示字体也为黑色,就看不到提示信息了。为此,我们得了解另一个全局对象,事实上当程序运行时,会创建三个全局对象:Application,Screen,Mouse,三个对象的职责非常明显。Screen封闭了运行的工程在屏幕上的状态,它有一个HintFont的属性,允许你设置提示信息的字体。

ko8598514 发表于 2008-6-24 08:05

冠通反**,同城游五张牌看牌器,同城游超级刷分器

*** 作者被禁止或删除 内容自动屏蔽 ***

gtioto 发表于 2008-7-17 06:43

俺来抢了。后面你的接着来

俺来抢了。后面你的接着来


而我们这些玩的朋友们应该要觉悟了

英雄们的气概,不得不佩服让佩服


非常厉害,想我们的敬爱的战士们敬礼!

[url=http://www.xcyouth.org.cn/]搬家公司[/url]-真诚的服务方便广大搬家市民
[url=http://www.shdazhaxie.com.cn/]上海大闸蟹[/url]-一家最优惠价格的阳澄湖大闸蟹团购
[url=http://www.tlyst.cn/]废品回收[/url]-本公司从事废品回收多年丰富的经验
[url=http://www.sh-cf.net/]上海厂房出租[/url]-开发区工业厂房,仓库出租,工业园区招商引资

庭承灏 发表于 2008-9-11 08:56

已经笑死9999个了,您千万不要做第10000个!

60多年前,一个朋友给我讲了一个笑话,把我笑翻了,后来由于肚子太疼进了医院。医生给我做手术前,问我 为什么笑成这样,我就讲给他听。他听后狂笑不止,最后竟然笑死了。

我被送上了法庭。法官让我把那个笑话讲出来,由陪审团判定是否与过失杀人的事实要件符合,我要求签订免责合同。法官宣布休庭,一天后重新开庭,宣布接纳我的意见。于是,我当庭把那个笑话讲了出来,结果有人笑得敲桌子,有人笑得在地上打滚。后来,当天所有听到这个笑话的人都笑死了。

我瞬间成了名人,还有了自己的网站,各大媒体纷纷进行效仿我的[url=http://www.tgxzs.com/]网络推广[/url]成名方式,各路记者纷纷要求采访我,我知道这笑话讲出去可能构成公共侵害,于是对着镜头,我含糊地说了一番话,大意就是:“理由永远是谎言,信仰永远是自慰。节目播出后,引起巨大反响。可没想到,有一天,几个神秘便衣闯进我的卧室,把我连拖带拽拉到一个黑屋子里。过了好久,一束强光照到我脸上。我勉强睁开眼睛,惊呆了,坐在我面前的人是目前惟一与我一样家喻户晓的人——总统。

注意,本内容绝对不是[url=http://www.tgxzs.com/]群发[/url]使用[url=http://www.tgxzs.com/download/]论坛群发[/url],或是其他[url=http://www.tgxzs.com/download/]群发软件[/url]发送的。反对[url=http://www.tgxzs.com/download/]网站推广[/url]者请不要对号入座。

总统大致交待了抓我的目的,很简单:把这个笑话录下来,然后送到中东敌对国家的独裁者那儿,笑死他。我只好答应他的要求,同时提出此笑话属于大规模杀伤性武器,不可针对平民。总统答应了。

两星期后,总统宣布已经掌握了那个笑话的关键技术,并且在沙漠地区试用成功。这在国际间引起轩然大波,很多国家惊慌失措,国际军事学家将此命名为“笑威慑”。就在此时,东方一个国家突然宣布也掌握了该笑话,原来给我讲笑话的那哥们投靠了该国。于是,我们之间形成了“笑威慑平衡”。

三年后,4月1日,我终日担心的终于发生了:中东一个恐怖组织掌握了那个笑话的原始技术,这个恐怖组织利用高科技手段在各大[url=http://www.tgxzs.com/]论坛群发[/url]笑话,说是[url=http://www.tgxzs.com/]网站推广[/url]。结果,文明遭到前所未有的破坏,各国恐恐惶惶不可终日。联合国只好召开全球首脑大会,最后将4月1日设定为愚人节。

60多年过去了,我已经风烛残年。在离开世界之前,作为历史见证人,我想有必要把这个笑话讲给大家。那天,我朋友给我讲的这个笑话很简单,很短,就一句话:



[size=4][color=red]  隐藏:
  本部分内容已经隐藏,必须回复后,才能查看.[/color][/size]

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.