- 博客(2)
- 收藏
- 关注
原创 控制程序运行实例的个数
一、让程序运行一个实例: 让程序运行一个实例的方法很多种,比如查找窗体、利用广播消息等,这些都比较弱智。比较好的方法有建立互斥对象或建立事件对象,这两方法类似,一个调用CreateMutex,一个调用CreateEvent,代码类似如下:const OBJECT_NAME={D515FA80-B31C-4A5A-A722-2AD4431FD68B};var hObject:THa
2007-02-02 14:05:00
624
原创 如何判断文本文件的编码格式?
这里指的文本是用于Windows系统中的扩展名为.txt的文件。Notepad(记事本)只支持四种格式:ANSI/Unicode/Unicode big endian/UFT-8,在Delphi中如何判断与读取这些不同格式的文本呢?首先,不同编码的文本,是根据文本的前两个字节来定义其编码格式的。定义如下:ANSI: 无格式定义;Unicode: 前两个字节为FFFE;Un
2006-06-05 23:07:00
1559
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人