博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
动态添加图片控件例子
阅读量:5064 次
发布时间:2019-06-12

本文共 1390 字,大约阅读时间需要 4 分钟。

void addPicBox()

{

    FormWindowControl           c;

    QueryRun                    qr;

    DocuRef         tmpDocuRef;

    Image           tmpImage;

    int             i = 1;

    int             j, maxControl;

    container       tmpBitmap,picCon;

    nj_ItemPhotoTable   nj_ItemPhotoTable,ItemPhotoTable;

    DocuImgs       curDocuimgs;

    ;

    element.lock();

    maxControl = groupPics.controlCount(); //获取groupPics的控件数量

    picCon = connull();

 

    Select FirstOnly ItemPhotoTable Where ItemPhotoTable.ItemId == Pictorical.ItemId

        &&  ItemPhotoTable.Color == Pictorical.Color;

    qr = this.initQuery(ItemPhotoTable);

    while (qr.next())

    {

        if(qr.changed(tableNum(Docuimgs)))

        {

         curDocuimgs = qr.get(tablenum(Docuimgs));

        }

        tmpDocuRef = qr.get(tablenum(DocuRef));

 

        tmpBitmap = curDocuimgs.Image;

        if (connull() == tmpBitmap)

            continue;

        tmpImage = new Image();

        if (i > maxControl) //如果groupPics中已有windows控件

            {

            c = groupPics.addControl(FormControlType::Image, "RunTimeControl");

            c.labelPosition(1);

            c.labelAlignment(2);

            c.imagemode(2);

            controlCon += [c.id()];

            }

        else

            c = this.control(conpeek(controlCon,i));//获取这个控件

        c.visible(true);

        c.label(strfmt('%1', tmpDocuRef.Nj_PhotoView));// 图片类型(角度、平面、侧面。。。)

        tmpImage.setData(tmpBitmap);

        c.image(tmpImage);

        picCon += [c.id(), tmpDocuRef.RecId];

        i++;

        }

    for (j = i; j<=maxControl; j++)  //将多余的控件隐藏

        {

        c = this.control(conpeek(controlCon, j));

        c.visible(false);

        }

    this.controlMethodOverload(true);

 

    element.unLock();

    element.redraw();

}

转载于:https://www.cnblogs.com/perock/archive/2011/07/28/2119169.html

你可能感兴趣的文章
bzoj1230 开关灯 线段树
查看>>
LinearLayout
查看>>
css3动画属性
查看>>
Mongodb 基本命令
查看>>
控制文件的备份与恢复
查看>>
PHP的SQL注入技术实现以及预防措施
查看>>
软件目录结构规范
查看>>
mysqladmin
查看>>
解决 No Entity Framework provider found for the ADO.NET provider
查看>>
设置虚拟机虚拟机中fedora上网配置-bridge连接方式(图解)
查看>>
[置顶] Android仿人人客户端(v5.7.1)——人人授权访问界面
查看>>
Eclipse 调试的时候Tomcat报错启动不了
查看>>
ES6内置方法find 和 filter的区别在哪
查看>>
Android入门之文件系统操作(二)文件操作相关指令
查看>>
Android实现 ScrollView + ListView无滚动条滚动
查看>>
java学习笔记之String类
查看>>
UVA 11082 Matrix Decompressing 矩阵解压(最大流,经典)
查看>>
jdk从1.8降到jdk1.7失败
查看>>
硬件笔记之Thinkpad T470P更换2K屏幕
查看>>
iOS开发——缩放图片
查看>>