摘要: 在自己编写文本文件读取函数的时候,你首先会遇到的第一个问题就是:对于给定的一个文件名,怎么知道它所代表磁盘文件的确是文本文件?这里有一个很简单的方法:把给定的那个文件看作是无类型的二进制文件,然后顺序地读出这个文件的每一个字节,如果文件里有一个字节的值等于0,那么这个文件就不是文本文件;反之,如果这个文件中没有一个字节的值是0的话,就可以判定这个文件是文本文件了。这是原理,下面看看在Delphi 中怎样编程来实现它--function IsTextFile(FileName:string):boolean; var Fs:TFileStream; i,size:integer; IsTextF 阅读全文
posted @ 2012-10-25 15:39 GameKing 阅读(1696) 评论(0) 推荐(0) 编辑
摘要: 指令功能AAA调整加AAD调整除AAM调整乘AAS调整减ADC进位加ADD加AND与ARPL调整优先级BOUND检查数组BSF位右扫描BSR位左扫描BSWAP交换字节BT位测试BTC位测试求反BTR位测试清零BTS位测试置一CALL过程调用CBW转换字节CDQ转换双字CLC进位清零CLD方向清零CLI中断清零CLTS任务清除CMC进位求反CMOVA高于传送CMOVB低于传送CMOVE相等传送CMOVG大于传送CMOVL小于传送CMOVNA不高于传送CMOVNB不低于传送CMOVNE不等传送CMOVNG不大于传送CMOVNL不小于传送CMOVNO不溢出传送CMOVNP非奇偶传送CMOVNS非负传 阅读全文
posted @ 2012-10-25 15:10 GameKing 阅读(671) 评论(0) 推荐(0) 编辑
摘要: 1.添加引用ShellAPI。2.运行程序时初始化 接受外部拖放。3.接收事件代码如下:unit mainForm;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls,StrUtils, WinSkinData, SkinCaption,ShellAPI;//添加ShellAPI引用 type TForm1 = class(TForm) Button1: TButton; OpenDialog1:... 阅读全文
posted @ 2012-10-25 14:26 GameKing 阅读(1605) 评论(0) 推荐(0) 编辑