【无标题】VFP如何判断网格（GRID）中的一个列是否在可视状态下

最新推荐文章于 2022-11-01 07:01:46 发布

weixin_41999297

最新推荐文章于 2022-11-01 07:01:46 发布

阅读量143

点赞数

分类专栏： VFP GRID 文章标签：大数据

本文链接：https://blog.csdn.net/weixin_41999297/article/details/125582460

版权

VFP 同时被 2 个专栏收录

28 篇文章 5 订阅

订阅专栏

GRID

3 篇文章 0 订阅

订阅专栏

如何判断网格（VFP.GRID）中的一个列是否在可视状态下的代码

LPARAMETERS toColumn

*-- 
*-- 关于列锁定后被隐藏：
*-- vfp 之  前  ObjToClient(m.toColumn, 2) = 0
*-- vfp sp2 中 ObjToClient(m.toColumn, 2) = ObjToClient(m.Grid, 2)
*-- 

If toColumn.Visible 
	If m.toColumn.ControlCount > 0
		Return ObjToClient(m.toColumn.Controls(1), 2) > 0                            &&  ObjToClient 返回一个控件或对象相对于表单的位置或尺寸。 2 左边
	Else
		Return Not ObjToClient(m.toColumn, 2) = ObjToClient(m.toColumn.Parent, 2)
	EndIf
Else
	If Not Version(6) > 600
		Return .T.
	Else
		Return .F.
	EndIf
EndIf

*!*	If toColumn.Visible And ObjToClient(m.toColumn.Controls(1), 2) > 0
*!*		Return .T.
*!*	Else
*!*		Return .F.
*!*	EndIf