16,747
社区成员
发帖
与我相关
我的任务
分享SQL Server数据库里某表的一字段存放的是varbinary数据，如何取到一byte数组里面？
并且让byte以字符串形式显示出来？例如，byte A6显示的是A6
...全文
请发表友善的回复…
发表回复
wuhaisan_super 2004-11-25
- 打赏
- 举报
回答的真的是很精辟啊
可惜我是看不懂
要是能够加一点注释就好了
可惜我是看不懂
要是能够加一点注释就好了
lxpbuaa 2004-11-23
- 打赏
- 举报
var
L, I: Integer;
S: string;
Bytes: Array of Byte;
begin
S := ADOTable1.Fields[0].AsString;
L := Length(S);
if L > 0 then
begin
SetLength(Bytes, L);
Move(S[1], Bytes[0], L);
S := '';
for I := Low(Bytes) to High(Bytes) do
S := S + #32 + IntToHex(Bytes[I], 2);
ShowMessage(S);
end;
end;
L, I: Integer;
S: string;
Bytes: Array of Byte;
begin
S := ADOTable1.Fields[0].AsString;
L := Length(S);
if L > 0 then
begin
SetLength(Bytes, L);
Move(S[1], Bytes[0], L);
S := '';
for I := Low(Bytes) to High(Bytes) do
S := S + #32 + IntToHex(Bytes[I], 2);
ShowMessage(S);
end;
end;
