Foxtable(狐表)用户栏目专家坐堂 → [求助]唐尸三摆手的多窗口在狐表里是怎样实现的?


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

主题:[求助]唐尸三摆手的多窗口在狐表里是怎样实现的?

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


加好友 发短信
等级:幼狐 帖子:127 积分:1020 威望:0 精华:0 注册:2011/8/2 12:34:00
[求助]唐尸三摆手的多窗口在狐表里是怎样实现的?  发帖心情 Post By:2013/3/19 15:38:00 [只看该作者]

因为在写一个项目,要求实现MDI窗口或者多窗口显示方式,求教一下上面图所示,唐尸三摆手的多窗口实现方式?
图片点击可在新窗口打开查看此主题相关图片如下:mdi窗口现实方式.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:127 积分:1020 威望:0 精华:0 注册:2011/8/2 12:34:00
  发帖心情 Post By:2013/3/19 17:13:00 [只看该作者]

狐爸求救,想不出来怎样实现这个功能?

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/19 17:18:00 [只看该作者]

最简单的办法,就是给你的表标题配合表图标,看看这一节后面的自定义图标:

 

http://www.foxtable.com/help/topics/0011.htm

 

 

 


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


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2013/3/19 17:34:00 [只看该作者]

以下是引用狐狸爸爸在2013-3-19 17:18:00的发言:

最简单的办法,就是给你的表标题配合表图标,看看这一节后面的自定义图标:

 

http://www.foxtable.com/help/topics/0011.htm

 

 

 

这个不能实现双击关闭,还有标签页的关闭图标。


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


加好友 发短信
等级:等待验证 帖子:3855 积分:20692 威望:0 精华:5 注册:2012/6/21 14:03:00
  发帖心情 Post By:2013/3/19 17:37:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:三尾狐 帖子:623 积分:3897 威望:0 精华:0 注册:2011/8/3 22:13:00
  发帖心情 Post By:2013/3/19 19:03:00 [只看该作者]

老大 并列窗口的向上属性放开了吧.

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


加好友 发短信
等级:幼狐 帖子:127 积分:1020 威望:0 精华:0 注册:2011/8/2 12:34:00
  发帖心情 Post By:2013/3/19 20:27:00 [只看该作者]

怎么让并列窗口标题向上显示?用了很多时间和精力暂时用TabControl控件实现了,还有一点小问题。

 

单击打开采购按钮代码

Dim tabc As WinForm.TabControl
tabc= e.Form.Controls("TabControl1")
    For a As Integer = 0 To tabc.TabPages.Count-1
            If tabc.TabPages(a).text = "采购" Then
                tabc.SelectedIndex = a
                Return
            End If
        Next
    tabc.TabPages.Add("采购","采购")
   tabc.SelectedIndex=tabc.TabPages.Count-1
    tabc.SelectedPage.Image=GetImage(ProjectPath & "002.ico")
If Forms("采购").Opened=False Then
 Forms("采购").open
End If

 

 

双击TabControl1代码

Dim tabc As WinForm.TabControl
tabc=e.Form.Controls("TabControl1")
Dim str As String
str=tabc.SelectedPage.Text

If tabc.SelectedIndex<>0 Then
    tabc.TabPages.Delete(str)
    If Forms(str).Opened=True
       Forms(str).Close
    End If    
End If

[此贴子已经被作者于2013-3-19 20:31:59编辑过]

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


加好友 发短信
等级:二尾狐 帖子:518 积分:4773 威望:0 精华:1 注册:2011/11/23 20:48:00
  发帖心情 Post By:2013/3/19 20:43:00 [只看该作者]

图中的按钮是怎么做的

怎么不是灰色系,而是有点水晶蓝的

 


图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2013-3-19 20:42:55编辑过]

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


加好友 发短信
等级:三尾狐 帖子:732 积分:5491 威望:0 精华:14 注册:2011/8/28 12:49:00
  发帖心情 Post By:2013/3/20 11:03:00 [只看该作者]

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=30056
[此贴子已经被作者于2013-3-20 11:04:32编辑过]

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


加好友 发短信
等级:三尾狐 帖子:732 积分:5491 威望:0 精华:14 注册:2011/8/28 12:49:00
  发帖心情 Post By:2013/3/20 11:04:00 [只看该作者]

这个按钮是动态创建的C1Input.C1Button

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