摘要：在自己编写文本文件读取函数的时候，你首先会遇到的第一个问题就是：对于给定的一个文件名，怎么知道它所代表磁盘文件的确是文本文件？这里有一个很简单的方法：把给定的那个文件看作是无类型的二进制文件，然后顺序地读出这个文件的每一个字节，如果文件里有一个字节的值等于0，那么这个文件就不是文本文件；反之，如果这个文件中没有一个字节的值是0的话，就可以判定这个文件是文本文件了。这是原理，下面看看在Delphi 中怎样编程来实现它－－function IsTextFile(FileName:string):boolean; var Fs:TFileStream; i,size:integer; IsTextF 阅读全文

摘要：指令功能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非负传 阅读全文

摘要：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:... 阅读全文

摘要：Delphi MessageBox() 用法参数MessageBox有两种，一种是API函数，另一种是MFC的CWnd类里对MessageBox API进行封装后的函数，名字也叫MessageBox。在API函数中:function MessageBox(hWnd:HWND,const Text, Caption: PChar; Flags:Longint = MB_OK): Integer;hWnd:对话父窗口句柄，对话框显示在Delphi窗体内，可使用窗体的Handle属性，否则可以用0,使其直接作为桌面窗体的子窗口。Text:欲显示的信息字符串。Caption:对话框标题客串。Flags 阅读全文