摘要：
有两种情况，一种是本机直接接入互联网，比如通过拨号或者ADSL；另一种是局域网通过一个网关或者路由接入互联网；尤其是第二种情况，如何在局域网内的一台机器上获得当前网关所取得的互联网IP地址呢？unit Functions;interfaceuses Windows... 阅读全文
摘要：
这是博主在很久以前无意中欣赏到的一个MTV，但到现在为止仍然是博主最喜欢的一个MTV，音乐、背景、画质、故事，无一不打动博主的心。 看了之后，只有一种感觉---音乐无国界！ 该MTV原名为“kiss”，我觉得取得不太好，曾给它改了个名“The eye”，后来觉得也不好，还不如原名“Kiss”，但终觉无法达意入境，于是又给它取了现在的这个名字---“The Love of late autumn”（爱在深秋）。Windows Media Player文件点击打开/折叠播放器下载文件 点击这里下载文件 阅读全文
摘要：
一些delphi开发的小技巧2008-04-22 21:16这是我从网上收集到的一些delphi开发的小技巧，现在与大家一起分享◇[DELPHI]网络邻居复制文件uses shellapi;copyfile(pchar('newfile.txt'),pchar('//computername/direction/targer.txt'),false);◇[DELPHI]产生鼠标拖动效果通过MouseMove事件、DragOver事件、EndDrag事件实现，例如在PANEL上的LABEL：var xpanel,ypanel,xlabel,ylabel:integ 阅读全文
摘要：
一些delphi开发的小技巧2008-04-22 21:16这是我从网上收集到的一些delphi开发的小技巧，现在与大家一起分享◇[DELPHI]网络邻居复制文件uses shellapi;copyfile(pchar('newfile.txt'),pchar('/... 阅读全文
摘要：
人间的情歌无数，但哪首最能打动人？最能让人感受到爱情带来的震撼？心目中只有一首----Celine.Dion 的 《The Power of Love》点击下载《The Power of Love》Cline.Dion(席琳.迪翁)更多Cline.Dion图片和资料......Windows Media Player文件点击打开/折叠播放器 阅读全文
摘要：
Here's how to call a Message Box with a timeout, the message box closes itself after the timeout period was reached.The trick is to call an undocumented MessageBoxTimeout API located in user32.dll. Thefunction returns an integer value of either a MB_TIMEDOUT value(indicating the timeout period w 阅读全文
摘要：
Here's how to call a Message Box with a timeout, the message box closes itself after the timeout period was reached.The trick is to c... 阅读全文
摘要：
够简单吧？超级简单实用 阅读全文
摘要：
2006-12-05 00:09:33 小宇飞刀还在吗？ 2006-12-05 00:10:14 刘伟您好，我现在有事不在，一会儿再和您联系 2006-12-05 00:12:15 小宇飞刀放在我的邮箱中 xieyunc@163.compwd: *******2006-12-05 00:12:57 刘伟您好，我现在有事不在，一会儿再和您联系 2006-12-05 08:24:40 刘伟收到，辛苦了过年回去请你吃饭 2006-12-07 09:33:11 刘伟[;-D] 2006-12-07 09:52:49 小宇飞刀[:*] 2006-12-07 09:53:38 刘伟你上次传给我的最新考.. 阅读全文
摘要：
写代码是一种艺术。使用Delphi，任何人都可以轻而易举地开发出某种软件、完成某些任务。而完美的代码则只有真正的高手才能写出。除了正确的缩进、大小写、命名规则之外，请时刻牢记爱因斯坦的名言--简单就是美。下面将谈及的五个代码问题，可能是初学者、甚至一些老鸟都会犯的错误。忠告一布尔型变量的赋值操作应该是直接的。例如，在一个if/then/else语句中，if子句将布尔型变量赋值为True，而else子句将其赋为False。下面这段代码的写法是不好的：view plainprint?ifIf_Love_DelphithenResult:=TrueelseResult:=False;而这样写就比较好 阅读全文