Foxtable(狐表)用户栏目专家坐堂 → [推荐]共有窗口边框怎么消除?


  共有3303人关注过本帖树形打印复制链接

主题:[推荐]共有窗口边框怎么消除?

帅哥哟,离线,有人找我吗?
大红袍
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 19:18:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 20:39:00 [显示全部帖子]

foxtable默认可风格就是蓝色的啊。要获取屏幕颜色,就直接用拾色器

 

http://www.baidu.com/baidu?wd=%CA%B0%C9%AB%C6%F7&tn=monline_4_dg

 


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 21:03:00 [显示全部帖子]

2楼的例子你测试有问题吗?我测试没问题啊。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 21:12:00 [显示全部帖子]

做个例子上来看看有没有变通方法。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 21:43:00 [显示全部帖子]

加上代码

 

Forms("窗口1").open
Dim tab = BaseMainForm.Controls("mainpages")
tab.BorderStyle = 0
tab.showtabs= False
tab.backcolor = Color.Lavender


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/18 23:38:00 [显示全部帖子]

Dim tab = forms("窗口1").panel.parent.parent
tab.TabsSpacing = 0
tab.TabAreaSpacing = 0
tab.Indent = 0

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/19 20:15:00 [显示全部帖子]

你窗口1要open,才能用里面的控件啊。

 

加入msgbox弹出看哪里错误。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/19 20:33:00 [显示全部帖子]

你窗口1要open,才能用里面的控件啊。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/19 20:51:00 [显示全部帖子]

说明你pg这个页面,没有图标。你之前肯定要赋值吧?

 

Forms("窗口1").Controls("TabControl1").TabPages(lb.Text).Image = GetImage("btn_close.png")


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/19 21:06:00 [显示全部帖子]

属性->页面名称->填为 Page2

 回到顶部
总数 13 1 2 下一页