全部博文(282)
发布时间:2013-01-15 08:55:22
Delphi调用Web Service进行文件的上传和下载时找到这两个函数的。1. 将Byte数组生成文件procedure ByteArrayToFile(const ByteArray : TByteDynArray; const FileName : string );var Count: integer; F: FIle of Byte; pTemp: Pointer;begin AssignFile( F, FileName ); Rewri.........【阅读全文】