关于TByteDynArray
gnolk 2014-08-14 02:16:25 在网上看到帖子:
http://www.cnblogs.com/JackSun/archive/2010/09/28/1837374.html
1. 将Byte数组生成文件
procedure ByteArrayToFile(const ByteArray : TByteDynArray; const FileName : string );
var
Count: integer;
F: FIle of Byte;
pTemp: Pointer;
begin
AssignFile( F, FileName );
Rewrite(F);
try
Count := Length( ByteArray );
pTemp := @ByteArray[0];
BlockWrite(F, pTemp^, Count );
finally
CloseFile( F );
end;
end;
直接运行 提示没有TByteDynArray 类型,是哪里做得不对?是少了哪样接口吗?