- 博客(9)
- 收藏
- 关注
RSS订阅原创 如何根据类的名字来生成对象
有时候我们可能在程序中需要动态去生成一些对象，但我们又不想写大量的case分支语句来实现，而是建一张表，根据类的名称或其他一些索引来生成类的实例——对象。如果你有这方面的需要，本文将会帮助你实现这一目的。在写正文之前首先要引进一个概念，类的变量（自己起的准确不准确无所谓，只大家明白就行啦）。这个类的变量并非我们平时看到的这样的定义如：Edit1:TEdit。这样的定义只是定义了一个对象。如果想定义
2005-08-20 13:58:00
1485
原创 如何用Delphi7编写WinXP界面的程序
前一段在网上看了不少介绍编写XML文件实现WinXP界面的方法，实际想在Delphi7中实现WinXP界面很单间。只需要在 uses 中加入 XPMan 就行， 或者在 implementation 后面加上 {$R WindowsXP.res} 也可以实现。
2005-01-29 11:57:00
1644
1
原创 扑克牌组件之二——利用 cards.dll 编写扑克牌组件
扑克组件的编写及使用上一次写了一个利用位图制作的扑克组件，这次换一下，试着利用cards.dll来做一人组件。这个组件没有大小王，速度也比上一个慢了许多。不过这个组件可以设置很多背景,而且它的宽度和长度都是可以更改的。 cards.dll 功能很全,我们这里只用它来画扑克牌的正面和反面,其他的一律不使用。如果您对这些用法感兴趣，可以到微软的MSDN上去查阅，这里就不再罗嗦了。下面请看：
2004-12-16 17:55:00
2362
原创 精确计算PI小数点后800位小数
近来，在网上发现一个能精确计算PI后面数百位的C程序，不敢独享，把其翻译成PASCAL版，供大家参考，该函数写的非常精巧，仅用了三行代码，就能精确计算出PI后800位小数。小弟不才，对数学造诣不深，不明白他算法的原理是什么，如果有懂的请不吝赐规教。下面将该函数的C版和PASCAL版一并贴出，供大家参考。////////////////////////////////////////
2004-09-08 12:16:00
2763
原创 数学表达式的计算——如何捕捉异常
在写程序的过程中，难免会出现各种各样的情况，有的情况也许不是我们想要的。有的人也许会用很多判断要严格控制程序，使其不会出现异常情况，但这样做可能会增加写程序的难度。其实我们还可以用一种更加简便的方法，那就是异常。在程序中合理的使用异常将使你在写程序中省去很多烦恼。在Delphi中，Borland 已经为我们定义了很多异常的类，我们可以直接使用。但是如果我们不去管异常的话，会使程序的的
2004-08-13 23:47:00
1830
原创 一个简单控件的编写--系统托盘
在网上看到不少系统托盘的控件，有的写的东西太多，用不上，但大家似乎都没有解决一个问题，那就是单击和双击怎么处理的问题，所以自己也写了一个贴出来。希望大家能多提意见，如果哪个地方有不对的地方请指出，但千万别骂。 这个控件很简单，可以用 Show 的方法显示图标，用 Hide 的方法来隐藏图标，可以处理单击和双击的事件，还有一个 Popup 菜单（在点击右键的时候弹出
2004-08-13 20:02:00
1424
原创 Win2000/XP/2003 下*号密码探测器
在Win98下，对于别的程序的密码框，我们可以用SendMessage函数可以对这个密码框下一个WM_GETTEXT 的命令获取这个密码框的内容。但自2000以后，微软的安全意识似乎强了一点，用这个命令对普通的窗口管用，但对于密码框已经不起作用了。有不少类似的程序是通过建立动态链接库的方式来获取，但是那样做太麻烦了，其实我们有更简便的作法。那就是对它先下一个命令，去除它的密码框的
2004-08-12 15:16:00
1848
1
原创 Thread类的创建及使用
一、Thread类的创建：unit Thread;{ 线程类的创建 编译环境: Windows 2003 Sever Delphi 7.0 Enterprise}interfaceuses classes,sysutils,StdCtrls;type TB = class(TThread) private i :integer; Fedt :TEdit; proced
2004-08-09 10:37:00
1213
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人