在datawindow中用picture控件显示数据库中读取的图片

那就在数窗里放一个Picture控件p_1，参考一下：

 Blob lb_pic,lb_write
 Long ll_length
 Int li_c,li_i,li_fileNum,li_qs,li_len,li_mod
 string ls_filename
  ll_no=trim(sle_no.text)//取编号
//取Blob
 selectblob picture
 into :lb_pic
 from t_health
 where no = :ll_no;

 ll_length = Len(lb_pic)
 IF ll_length<1 THEN RETURN

li_c = ll_length/32765
li_mod = Mod(ll_length,32765)
IF li_mod>0 THEN li_c++

ls_filename = "bbb.jpg"
li_FileNum = FileOpen(ls_filename,StreamMode!,write!,lockWrite!,replace!)
FOR li_i=1 to li_c
    li_qs = (li_i - 1) * 32765 + 1
    IF li_i<li_c THEN
       li_len = 32765
    ELSE
       li_len = li_mod
    END IF
    lb_write = blobmid(lb_pic,li_qs,li_len)
    FileWrite(li_fileNum,lb_write)
NEXT
fileclose(li_filenum)
dw_1.modify("p_1.filename='bbb.jpg'")
 

//PS:此文章并非原创，代码来自CSDN的嘘嘘兔！