以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口中表的边缘部分请问怎么贴边处理?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141126)

--  作者:z769036165
--  发布时间:2019/9/21 17:03:00
--  窗口中表的边缘部分请问怎么贴边处理?

图片点击可在新窗口打开查看此主题相关图片如下:新建位图图像.bmp
图片点击可在新窗口打开查看



图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20190921170324.png
图片点击可在新窗口打开查看

这种窗口中表的在独立窗口中,设置好了显示是贴边的,没有左右上下的那个下拉条,但是应用在别人的有些电脑或者改成DropDownForm窗口就又存在这个下拉条,每次都多余一点点边缘或者多了2个下拉条,作为下拉窗口很难看



Dim spc As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Tables("窗口_table1").SetColVisibleWidth("编号|80|客户名称|" & spc.Width -255 & "|日期|145")

之前找到这种设置,但是不管用,还是出现问题!

[此贴子已经被作者于2019/9/21 17:04:00编辑过]

--  作者:有点蓝
--  发布时间:2019/9/21 17:20:00
--  
Dim spc As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Tables("窗口_table1").SetColVisibleWidth("编号|80|客户名称|" & spc.Width -255 & "|日期|100")
Tables("窗口_table1").ExtendLastCol = True