文本文件是以行为单位进行读、写的。由于每一行的长度不一定相同，不能计算出给定行在文件中的确切位置，因而只能顺序地读写。 文本文件只能单独为读或写而打开，在一个打开的文本文件上同时进行读、写操作是不允许的。 文本文件的打开需要两个步骤：1.文件变量与文件名关联；2.初始化读写。1.文件变量与文件名关联... Read More
posted @ 2015-11-27 23:43
findumars
Views(418)
Comments(0)
Diggs(0)
闲着没事，看着任务管理器好玩，查资料先简单实现一下，代码中没有加入获取CPU占用率的代码，这个代码网上很多，只是不喜欢那种写法，这里就不写了。以后继续完善，对于System Process和System的信息还没法获得，那位兄弟知道可以提个醒。代码如下[delphi]view plaincopyun... Read More
posted @ 2015-11-27 23:39
findumars
Views(787)
Comments(0)
Diggs(0)
SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_TRANSPARENT or WS_EX_LAYERED ); WS_EX_ACCEPTFILES = 0x00000010 指明了一个已创建 Read More
posted @ 2015-11-27 23:38
findumars
Views(528)
Comments(0)
Diggs(0)
平时很少使用大文件的内存映射，碰巧遇到了这样的要求，所以把过程记录下来，当给各位一个引子吧，因为应用不算复杂，可能有考虑不到的地方，欢迎交流。对于一些小文件，用普通的文件流就可以很好的解决，可是对于超大文件，比如2G或者更多，文件流就不行了，所以要使用API的内存映射的相关方法，即使是内存映射，也不... Read More
posted @ 2015-11-27 23:36
findumars
Views(1174)
Comments(0)
Diggs(0)
其中涉及到的一些API，网上均能查到详细的解释，这里不再熬述。源码下载因为是全局钩子，所以要用dll注入。用到的鼠标消息结构如下：[delphi]view plaincopyPMouseHookStruct=^TMouseHookStruct;{$EXTERNALSYMtagMOUSEHOOKSTR... Read More
posted @ 2015-11-27 23:35
findumars
Views(1801)
Comments(0)
Diggs(0)
浙公网安备 33010602011771号