delphi中使用API时的一点注意之处
来源:互联网 发布:云软件有哪些 编辑:程序博客网 时间:2024/05/22 03:43
我们知道,很多情况下,Windows API函数都需要一个缓冲区,例如以获取临时目录的API GetTempPath为例,这个函数需要一个Buffer用来存放返回的目录名称,而很多人代码(包括许多高手和Borland的专家)是这样写的:
function GetTempDirectory: String;
var
TempDir: array[0..255] of Char;
begin
GetTempPath(255, @TempDir);
Result := StrPas(TempDir);
end;
很明显,如果临时目录的名称超过256,那么就会发生缓冲区溢出,得到的数据也不完全,实际上,临时目录全路径很可能超过256,Windows的长文件名是指这个目录或者文件的名字的限制,不是Full pathname的限制!那么象这种函数该怎么来使用呢?
一般地,需要缓冲区的函数,我们需要调用两次!第一次调用是为了获得缓冲区的长度,然后第二次才是真正的调用,以上面的为例,真正正确的写法应该是:
procedure TForm1.Button1Click(Sender: TObject);
var
mybuf:array of char;
len:integer;
begin
len:=GetTempPath(0,nil);
setlength(mybuf,len);
GetTempPath(len+1,pchar(mybuf));
showmessage(pchar(mybuf));
end;
其他类似的函数如GetComputerName等等,都应该如此使用。 另此处也注意Pchar的使用方法!
function GetTempDirectory: String;
var
TempDir: array[0..255] of Char;
begin
GetTempPath(255, @TempDir);
Result := StrPas(TempDir);
end;
很明显,如果临时目录的名称超过256,那么就会发生缓冲区溢出,得到的数据也不完全,实际上,临时目录全路径很可能超过256,Windows的长文件名是指这个目录或者文件的名字的限制,不是Full pathname的限制!那么象这种函数该怎么来使用呢?
一般地,需要缓冲区的函数,我们需要调用两次!第一次调用是为了获得缓冲区的长度,然后第二次才是真正的调用,以上面的为例,真正正确的写法应该是:
procedure TForm1.Button1Click(Sender: TObject);
var
mybuf:array of char;
len:integer;
begin
len:=GetTempPath(0,nil);
setlength(mybuf,len);
GetTempPath(len+1,pchar(mybuf));
showmessage(pchar(mybuf));
end;
其他类似的函数如GetComputerName等等,都应该如此使用。 另此处也注意Pchar的使用方法!
- delphi中使用API时的一点注意之处
- delphi中使用API时的一点注意之处
- Qt中QMap的使用注意一点
- Qt中QMap的使用注意一点
- 使用stringstream时需要注意的一点
- Delphi中使用资源文件的一点记录
- 使用 .net 2.0 中 linkLabel 控件要注意的一点
- STRUTS2 中使用事物需要注意的一点
- Java中使用Timer要注意的一点
- QT中使用控制台和Application需要注意的一点
- MSDN使用的一点注意
- Delphi中使用TXMLDocument控件应注意的问题
- Delphi中使用Lua脚本语言的几点注意!
- delphi中使用override需要注意的地方
- wince 中使用HttpSendRequest函数POST数据时应该注意的一点
- wince 中使用HttpSendRequest函数POST数据时应该注意的一点
- wince 中使用HttpSendRequest函数POST数据时应该注意的一点
- wince 中使用HttpSendRequest函数POST数据时应该注意的一点
- 侯捷先生网站
- 昔日不再
- gcc使用的方法
- “如何学VC++???”
- 语言的迷失
- delphi中使用API时的一点注意之处
- 10个经典小故事
- 客户所想的不等于我们所想的
- 水园
- 移动通信技术的应用
- MSN P2P 协议实现 msmp2p.h
- 系统启动时弹出对话框
- MSN P2P 协议实现 msmp2p.cpp
- ASP数据库连接