|
我们知道，很多情况下，Windows API函数都需要一个缓冲区，例如以获取临时目录的API GetTempPath为例，这个函数需要一个Buffer用来存放返回的目录名称，而很多人代码(包括许多高手和Borland的专家)是这样写的：gE8Linux联盟
function GetTempDirectory: String;gE8Linux联盟
vargE8Linux联盟
TempDir: array[0..255] of Char;gE8Linux联盟
begingE8Linux联盟
GetTempPath(255, @TempDir);gE8Linux联盟
Result := StrPas(TempDir);gE8Linux联盟
end;gE8Linux联盟
很明显，如果临时目录的名称超过256，那么就会发生缓冲区溢出，得到的数据也不完全，实际上，临时目录全路径很可能超过256，Windows的长文件名是指这个目录或者文件的名字的限制，不是Full path/name的限制！那么象这种函数该怎么来使用呢？gE8Linux联盟
一般地，需要缓冲区的函数，我们需要调用两次！第一次调用是为了获得缓冲区的长度，然后第二次才是真正的调用，以上面的为例，真正正确的写法应该是：gE8Linux联盟
function GetTempDirectory:string;gE8Linux联盟
vargE8Linux联盟
Len:integer;gE8Linux联盟
begingE8Linux联盟
Len := GetTempPath(0,nil);gE8Linux联盟
SetLength(Result,Len + 1);gE8Linux联盟
GetTempPath(Len,@Result[1]);gE8Linux联盟
end;gE8Linux联盟
其他类似的函数如GetComputerName等等，都应该如此使用。 gE8Linux联盟
Linux联盟收集整理 ,转贴请标明原始链接,如有任何疑问欢迎来本站Linux论坛讨论 |
|
