在Delphi中调用API的问题

[haoyanbin2002cn]

在调用
function WriteFile(hFile: THandle; const Buffer; nNumberOfBytesToWrite: DWORD;
var lpNumberOfBytesWritten: DWORD; lpOverlapped: POverlapped): BOOL; stdcall;
有个问题

var
str:string;
begin
WriteFile(hFile,pchar(str)^nBytes,lcb,nil);
//为什么此处是pchar(str)^而不是pchar(str)
end;

[wengj]

buffer 是一个Char数组，而不是一个PChar地址