字符转化问题
iFileHandle,iFileLength: Integer;
Buffer: PwideChar;
sWZ :WideString;
iFileHandle := FileOpen(filedir +'info.txt', fmOpenRead);
iFileLength := FileSeek(iFileHandle,0,2);
FileSeek(iFileHandle,0,0);
Buffer := PWideChar(AllocMem(iFileLength +2));
FileRead(iFileHandle, Buffer^, iFileLength);
FileClose(iFileHandle);
sWZ:=widechartostring(buffer);
执行 sWZ:=widechartostring(buffer)总报地址错误,如果不用这函数,怎么转换成widestring
谢谢