如何提取sql的image类型数据后赋给string类型的变量？

Question

我现在image类型字段的数据为“0x0100000EA0100....”现在我想把它取出来付给string类型的变量str,或一个EDIT.
比如结果是： edit1.text:="0x0100000EA0100";或 str:="0x0100000EA0100";
请问要如何做，能否给个例子

Answer 1

//首先你的image字段就是流，你把字段内容读到流里面（这个会吧，用TBlobField(ADOQuery1.FieldByName('pic')).SaveToStream(),
//然后把流中的内容分别独到byte中，然后转成字符串
procedure ConvertStreamToString(stream: TMemoryStream);
var
  s:string;
  i:Byte;
begin
  stream.Position := 0;
  while stream.Position < stream.Size do
  begin
    stream.Read(i,SizeOf(Byte));
    s := s+IntToHex(i,2);   //将int转换为十六进制字符串
  end;
  ShowMessage(s);
end;