如何用代码在dataobject 的 header区域 插入新的 图片控件，并设置图片？谢谢

在預覽的時候加入以下的代碼：
string ls_bitmap = 'create bitmap(band=header filename="%picname%" x="279" y="160" height="120" width="137" border="0"  name=%name% visible="1" )'
//band=header  表示header区域
string ls_picname,name
 ls_picname = 'PCC.BMP' //圖片名稱 當前路徑下
 name = '1'  //控件名稱
ls_bitmap = replace(ls_bitmap,pos(ls_bitmap,'%picname%'),9,ls_picname)  //替換字串的圖片名稱
ls_bitmap = replace(ls_bitmap,pos(ls_bitmap,'%name%'),6,'P_'+trim(name)) //替換字串的控件名稱,
messagebox('test',ls_bitmap)
ld_datawindw.modify(ls_bitmap)
以上例子 我只設定了 圖片名與 控件名 兩個變量，可以根據時間情況增加如：visible,border...等也可以改成變動的。