| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1201 人关注过本帖
标题:怎么改变 Controls 对应的控件名称?
取消只看楼主 加入收藏
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
结帖率:98.98%
收藏
已结贴  问题点数:20 回复次数:0 
怎么改变 Controls 对应的控件名称?
Controls 用于存取容器对象中控件的数组。
图片附件: 游客没有浏览图片的权限,请 登录注册

图片附件: 游客没有浏览图片的权限,请 登录注册

上面第1个图是设计界面,第7个是最后加上去的。第2个图是运行效果图,最后加的那个图跑到最后去了。
要怎么修改,在能保持他的位置不变?
我是这样遍历的。
LOCAL nLeft
nLeft = 5

FOR EACH oBar IN this.Controls &&遍历整个 Cnt_Bar
    IF oBar.Visible = .t.
       oBar.Left = nLeft
       nLeft = nLeft + oBar.Width + 5

    ENDIF
    IF LOWER(oBar.Class) = LOWER("Container") &&容器的图片
       IF oBar.image1.Enabled = .f.
          oBar.image1.Picture = "img\ToolBar\" + oBar.Name + "02.png"
       ELSE
          oBar.image1.Picture = "img\ToolBar\" + oBar.Name + "01.png"
       ENDIF
    ENDIF
ENDFOR
this.Width = nLeft + 5

搜索更多相关主题的帖子: 效果图 图片 
2017-05-14 11:21
快速回复:怎么改变 Controls 对应的控件名称?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023148 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved