回 帖 发 新 帖 刷新版面

主题:如何去掉表格最右边的空白列

如题

回复列表 (共8个回复)

沙发

grid1.ColumnCount=grid1.ColumnCount-n
其中grid1是表格名,n是要删除的空列数

板凳

[quote]grid1.ColumnCount=grid1.ColumnCount-n
其中grid1是表格名,n是要删除的空列数[/quote]
不行呀,这语句把有用的列删除了,空白列却未删!

3 楼

从图片看搂猪所要求删除的不是列,是GRID列宽度不够表格宽度时的空白区域。VFP的GRID不能像其他语言或第三方控件一样:只设计一行或一列就显示一行或一列,会按表格的宽度将其他空白区也画出表格线的。(本人是没法解决这个问题,其他高手请指教。)

4 楼

用表格第三列(最后一列)宽度充满表格:
thisform.grid1.column3.Width=thisform.grid1.Width-thisform.grid1.column1.Width-thisform.grid1.column2.Width

5 楼


谢谢各位,这可能是vf的bug,我细看下,该表格的源表最右端也有相同的空白处(任何表都有)目前看没好的办法啦。

6 楼

With Thisform.Grid1
  .Width=.Column1.Width+.Colum2.Width+......
Endwith
或将表格宽度与各列宽度之各的差再酌情分配到各列中去。

7 楼

应该用手动的方法来改变列宽。
表单中点击GRID的任意一个COLUMN,然后将鼠标指针指向两个列宽表头的竖线处,就会出现一个左右方向的箭头,按下左键,向左右移动鼠标,就可以改变列宽了。
或者改变GEID的宽度,将其改小点。

8 楼

最好是水平不让滚动

我来回复

您尚未登录,请登录后再回复。点此登录或注册