通过下面代码将blob类型保存为图片后
blob lb_picture
integer li_FileNum
String ls_Path ,ls_errtext
Selectblob blob_zd into :lb_picture from table_name where l_name = '201207';
li_FileNum = FileOpen( 'd:\123.gif',StreamMode!, Write!, Shared!,Append!)
if li_FileNum = -1 then
fileclose(li_filenum)
end if
FileWrite(li_FileNum, lb_picture)
fileclose(li_filenum)
在datawindow中用picture空间打开图片,上面的编辑界面有图片,而下面的预览则是空的
在window窗体的picture控件setpicture(blob)这个在窗体中能显示;
已经bmp、jpg、gif这三个都不行(jpg在datawindow直接报错:Not a JPEG file: starts with 0x47 0x49)已经核实blob生成的图片文件格式是gif的,
把生成的图片放到word文档中打印预览又可以看见
唯独在datawindow中不行
如图:
控件属性: