数为要转换的十进制数据,第二个参数是指定使用多少位来显示十六进制数据。参考实例:
Edit1.Text := IntToHex('100', 2);
执行结果,Edit1.Text等于64。
注意:
Delphi没有提供专门的“十六进制”转换为“十进制”的函数。使用StrToInt函数可以实现这个功能。具体代码是:I := StrToInt('S\' + '64'); 这时I等于100。加上一个'S\'即可将“十六进制”转换为“十进制”。
High:返回数组下标的最大值。
10.MidStr(所在单元:StrUtils)
功能说明:返回指定范围内的字符串。该函数有三个参数。第一个参数为源字符串,第二个参数为起点,第三个参数为结束点。通过第二、第三个参数则可指定要复制字符串的范围。
Copy函数与此函数类似。MidStr主要用于处理含有中文字符的字符串。
参考实例:
var
S: String;
H: String;
begin
S := MidStr('China', 1, 2); // S变量为Ch
H := MidStr('电脑报', 1, 1); // H变量为“电”。如果使用Copy函数,则应是H := Copy('电脑报, 1, 2),否则返回的将不是“电”字。因此在使用操作含有中文的字符串时,最好使用MidStr。
end;
UpperCase:将字符(串)中的英文字符转换为大写。
Randomize ;随机数准备函数
Random(i:integer):Integer随机数函数
Random(0),Random(0)+10,Random(20)+30
adoquery的lock type用ltBatchOpti
mistic
然后用
ADOQuery1.UpdateBatch();
就可以了
关于线程
Chdir('c:\abcdir');转到目录
Mkdir('dirname');建立目录
Rmdir('dirname');删除目录
GetCurrentDir;//取当前目录名,无'\'
ForceDirectories('d:\123\12')建立多层目录
DirectoryExists('c:\abcdir')判断目录是否存在
Getdir(0,s);//取
工作目录名s:='c:\abcdir';
Deletefile('abc.txt');//删除文件
Renamefile('old.txt','new.txt');//文件更名
ExtractFilename(filelistbox1.filename);//取文件名
ExtractFileExt(filelistbox1.filename);//取文件后缀
ExtractFileDir(filelistbox1.filename);//取文件名路径
ExtractSho
rtPathName//获取短路径
◇[DELPHI]判断鼠标按键
if GetAsyncKeyState(VK_LButton)<>0 then ... //左键
if GetAsyncKeyState(VK_MButton)<>0 then ... //中键
if GetAsyncKeyState(VK_RButton)<>0 then ... //右键
◇[DELPHI]按键接受消息
OnCreate事件中处理:Application.OnMessage:=MyOnMessage;
procedure Tform1.MyOnMessage(var MSG:TMSG;var Handle:Boolean);
begin
if msg.message=256 then ... //ANY键
if msg.message=112 then ... //F1
if msg.message=113 then ... //F2
end;
◇删掉
程序自己的exe文件
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
F:TextFile;
begin
AssignFile(F,'delself.bat');
Rewrite(F);{F为TextFile类型}
WriteLn(F,'del '+ExtractFileName(Application.ExeName));
//可以在这再加一句修改下载过来的那个升级程序名字。。这样自动升级就比较完善了,可以升级本身
WriteLn(F,'del %0'); //删除自己delself.bat
CloseFile(F);
WinExec('delself.bat',SW_HIDE);
end;
FileAge 函数 返回文件已存在的时间
FileClose 命令 关闭指定的文件
FileCreate 命令 用指定的文件名建立新文件
FileDateToDateTime 函数 将DOS的日期格式转换为DELPHI的日期格式
FileExists 函数 检查文件是否存在
FileGatAttr 函数 返回文件的属性
FileGetDate 函数 返回文件的DOS日期时间标记
FileOpen 命令 用指定的存取模式打开指定的文件
FilePos 函数 返回文件的当前指针位置
FileRead 命令 从指定的文件读取
FileSearch 命令 在目录中
搜索指定的文件
FileSeek 函数 改变文件的指针
FileSetAttr 函数 设置文件属性
FileSetDate 函数 设置文件的DOS日期时间标记
FileSize 函数 返回当前文件的大小
FileWrite 函数 对指定的文件