点击命令按钮 实现图片的动态切换
数据窗口对象中有一个列名dir ,存储图片路径
我从数据窗口里 选择一行进行图片预览 然后在预览窗口 通过 单击button按钮实现多个图片的动态切换 这个怎么实现
stru_pic stru_pic //结构类型 有三个属性s_allpic,l_max ,row
string s_allpic[]
long l_max,row
stru_pic=message.powerobjectparm
l_max=stru_pic.l_max //图片最大数
s_allpic=stru_pic.s_allpic //得到数据窗口里的图片路径 ,以数组形式显示
row=stru_pic.l_row //得到被选中的行数
if row=stru_pic.l_row then
if row >=l_max then
row=1
else
row=row + 1
end if
p_1.picturename=s_allpic[row]
//messagebox("tisih","返回'"+s_allpic[row]+"'")
end if
希望有给解答的 谢谢