首先为表单增加一属性:gridold
第一步:FORM1.INIT(取表单的原始宽度)
thisform.gridold=thisform.grid1.Width
第二步:FORM1.CLICK(GRID左移,缩小GRID宽度,left是不变的)
thisform.grid1.Width=thisform.grid1.column1.width && thisform.grid1.column1.width具体设置多少,楼主自定。
第三步:FORM2.DBLCLICK(恢复表单的原始宽度)
thisform.grid1.Width=thisform.gridold
设置个表单,验证下。第二、三步代码具体放在什么地方合适,楼主自定。
[
本帖最后由 sdta 于 2012-6-2 01:35 编辑 ]