怎么用柯达控件显示二进制图片
谢谢
------解决方案--------------------
ole_edit控件为Kodak Image Edit Control
ole_edit.object.ScrollBars = true //设置滚动条
ole_edit.object.zoom = 125 //设置按125%显示图象
ole_edit.object.image = "1.tif" //设置图象文件路径
ole_edit.object.display() //显示图象
------解决方案--------------------
- C/C++ code
//================================================//函数名称：gf_blobtoimage//------------------------------------------------//函数功能：此函数用于把blob转换为文件 //------------------------------------------------//入口参数：名称 类型 描述// ab_file blob 从数据库中提出的blob// as_path string 生成的文件//返回值：无 //书写人：ljh//------------------------------------------------long ll_filenum,li_nblob lblb_mid//ll_bloblen=len(ab_file)if len(ab_file) > 0 then ll_filenum=fileopen(as_path,streammode!,write!,Shared!,replace!) //建立文件 li_n=1 if len(ab_file)<32765 then filewrite(ll_filenum,ab_file) else DO lblb_mid=blobmid(ab_file,li_n,32765) li_n=li_n+32765 filewrite(ll_filenum,lblb_mid) LOOP until len(lblb_mid)=0 end if fileclose(ll_filenum) end if