社区
语言基础/算法/系统设计
帖子详情
如何将二进制文件读出后转换成VARIANT类型?
蒋锋
2003-10-20 11:02:33
我把一个二进制文件读入内存后,怎么才能转换到VARIANT类型?因为二进制文件中有0x00值,能不能用VarDataFromOleStr之类的函数吧
...全文
68
3
打赏
收藏
如何将二进制文件读出后转换成VARIANT类型?
我把一个二进制文件读入内存后,怎么才能转换到VARIANT类型?因为二进制文件中有0x00值,能不能用VarDataFromOleStr之类的函数吧
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
阿发伯
2003-10-21
打赏
举报
回复
直接使用variant类型装入文件就行了,以下是我的3层数据库程序中间层的一个读二进制流的借口方法,供参考,OleVariant和Variant用法是相同的。
procedure TZfInfoRDM.ReceiveAccessory(const AccesName: WideString;
out Data: OleVariant; out Size: Integer);
var
SearchRec: TSearchRec;
S: TStream;
p: Pointer;
FileName: String;
begin
Size := 0;
FileName := DModule.SystemPath + AccessPath + AccesName;
// 在系统二进制文件目录查找文件,成功将结果记录到SearchRec中
if FindFirst(FileName, faAnyFile, SearchRec) = 0 then
begin
Size := SearchRec.Size; // 取文件长度,打开文件供读
S := TFileStream.Create(FileName, fmOpenRead);
try
Data := VarArrayCreate([0, Size], VarByte); // 建立单字节的动态数组
p := VarArrayLock(Data);
try
S.Read(p^, Size); // 读文件
finally
VarArrayUnLock(Data);
end;
finally
S.Free;
end;
end;
end;
huojiehai
2003-10-20
打赏
举报
回复
http://haitian.myrice.com/ByteDataTrans.txt
huojiehai
2003-10-20
打赏
举报
回复
这个合你要求!
VC在Sql Server数据库中如何存取
二进制
图片信息
VC在Sql Server数据库中如何存取
二进制
图片信息 在VC6.0中我们通常用Ado的Field 对象的GetChuck和AppendChunk来读写Blob对象,但是这样做要写很多的代码,其实ado给我们提供了一个更易操作的对象那就是 Stream ...
在delphi中操作ms sql的varbinary
类型
数据
在项目中要将一个结构加密,加密后的数据都是
二进制
,而要将这些
二进制
结果存储到数据库中,等用到时再从数据库中
读出
,然后根据解密算法,获取结果。希望能对大家有所帮助。sql server中用到的数据
类型
是varbinary...
vb读取文本
文件
某行的内容
VB可以使用
二进制
方式打开文本
文件
,以Get 语句读到字节数组,再使用StrConv 函数将其转换为字符串,而后使用Split函数文本的字符串数组及总句数,使用InputBox 函数来输入需要读某行文本。 Get 语句 将一个已打开的...
浅谈Python和VC中的编码问题(转)
以前编码问题总能让自己凑或蒙过去,最近要做一个项目服务器端用python写,客户端用c++,工程编译的字符集使用UNICODE。...内存编码即源代码编译成为
二进制
文件
的时候采用的编码。 <br />比如,在VC 2
VBA 读写
文件
处理文本
文件
1、Open 语句 语法:Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength] 其中access、lock、reclength为可选参数,一般不用。 mode ...
语言基础/算法/系统设计
16,748
社区成员
33,247
社区内容
发帖
与我相关
我的任务
语言基础/算法/系统设计
Delphi 语言基础/算法/系统设计
复制链接
扫一扫
分享
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章