ViewPort W idth 属 性

ViewPort W idth 属 性 - 图1ViewPort W idth 属 性 - 图2包含 一个表单的视口宽度 设计和运行时只读

语 法

Ob jec t.V iewPortWidth

说 明

ViewPort W idth 属 性 - 图3ViewPort W idth 属 性 - 图4ViewPort W idth 属 性 - 图5ViewPort W idth 属 性 - 图6视口 一个表单在容器中显示的矩形区域 表单容器 控制了 视口 的大小 如果 更改 表单容器 的大小 视口 也将改变大小

ViewPort W idth 属 性 - 图7ViewPort W idth 属 性 - 图8ViewPort W idth 属 性 - 图9ViewPort W idth 属 性 - 图10视口 的属性和 方法 通常用于 ActiveDocuments 中的表单 如果 一个 ActiveDocument 显示 了一个带滚动条的表单 则当 视口 的尺寸小于围绕表单上控件的矩形的大小时 就会在该表单上显示滚动条

ViewPort W idth 属 性 - 图11ViewPort W idth 属 性 - 图12视口 高度的度量单位由表单的 ScaleMode 属性设置 确定 像素 默认的 或

ViewPort W idth 属 性 - 图13foxels

应 用 于

表 单 对 象

请 参 阅

ScaleMode 属 性 , SetViewPort 方 法 ,V iewPortHeight 属 性 ,V iewPortLeft 属性 ,V iewPortTop 属 性

Visible 属 性

ViewPort W idth 属 性 - 图14ViewPort W idth 属 性 - 图15指定对象是可见还是隐藏 设计和运行时可用

语 法

Ob jec t.V isible[= lExp r]

参 数 描 述

lExpr

ViewPort W idth 属 性 - 图16V isible 属 性 的 设 置 有

ViewPort W idth 属 性 - 图17ViewPort W idth 属 性 - 图18设 置 说 明

ViewPort W idth 属 性 - 图19ViewPort W idth 属 性 - 图20

(.T.)

在表单设计器中为默认值 对象可见

ViewPort W idth 属 性 - 图21ViewPort W idth 属 性 - 图22ViewPort W idth 属 性 - 图23ViewPort W idth 属 性 - 图24假 (.F.) 在程序代码中为默认值 对象隐藏

说 明

ViewPort W idth 属 性 - 图25ViewPort W idth 属 性 - 图26ViewPort W idth 属 性 - 图27ViewPort W idth 属 性 - 图28设置 _SCREEN 系统变量的 Visible 属性 在 VisualFoxProforWindows 中不起作用即使对象隐藏 在代码中也可以访问该属性

ViewPort W idth 属 性 - 图29ViewPort W idth 属 性 - 图30ViewPort W idth 属 性 - 图31ViewPort W idth 属 性 - 图32ViewPort W idth 属 性 - 图33ViewPort W idth 属 性 - 图34ViewPort W idth 属 性 - 图35ViewPort W idth 属 性 - 图36ViewPort W idth 属 性 - 图37ViewPort W idth 属 性 - 图38为了在启动时隐藏对象 请在设计时设置 Visible 属性为 假 .F. 如果在代码中设置了 Visible 属性 可以隐藏对象 并在运行时 响应一个特定的事件而显示它

ViewPort W idth 属 性 - 图39ViewPort W idth 属 性 - 图40ViewPort W idth 属 性 - 图41ViewPort W idth 属 性 - 图42ViewPort W idth 属 性 - 图43ViewPort W idth 属 性 - 图44当表单的 Visible 属性设置为 假 .F. 时 表单就隐藏起来 而最近活动的表单

ViewPort W idth 属 性 - 图45ViewPort W idth 属 性 - 图46ViewPort W idth 属 性 - 图47ViewPort W idth 属 性 - 图48ViewPort W idth 属 性 - 图49ViewPort W idth 属 性 - 图50ViewPort W idth 属 性 - 图51ViewPort W idth 属 性 - 图52ViewPort W idth 属 性 - 图53ViewPort W idth 属 性 - 图54ViewPort W idth 属 性 - 图55ViewPort W idth 属 性 - 图56ViewPort W idth 属 性 - 图57ViewPort W idth 属 性 - 图58ViewPort W idth 属 性 - 图59ViewPort W idth 属 性 - 图60ViewPort W idth 属 性 - 图61ViewPort W idth 属 性 - 图62ViewPort W idth 属 性 - 图63ViewPort W idth 属 性 - 图64集 表单或其他对象则变为活动的 当表单的 Visible 属性设置为 真 .T. 时 表单变为可见的 将表单的 Visible 属性设置为 真 .T. 并不影响表单的 Order 属性设置 在表单的 Visible 属性设置为 真 .T. 时 它并不变为活动的 可使用Show 方法来激活表单并同时使之可见

ViewPort W idth 属 性 - 图65ViewPort W idth 属 性 - 图66ViewPort W idth 属 性 - 图67ViewPort W idth 属 性 - 图68ViewPort W idth 属 性 - 图69ViewPort W idth 属 性 - 图70注 意 如 果 表 单 对 象 的 Visible 属 性 设 置 为 假 .F. 则 不 显 示 该 表 单 即

ViewPort W idth 属 性 - 图71ViewPort W idth 属 性 - 图72ViewPort W idth 属 性 - 图73ViewPort W idth 属 性 - 图74ViewPort W idth 属 性 - 图75ViewPort W idth 属 性 - 图76ViewPort W idth 属 性 - 图77ViewPort W idth 属 性 - 图78ViewPort W idth 属 性 - 图79使 表 单 集 对 象 的 Visible 属 性 设 置 为 真 ViewPort W idth 属 性 - 图80 .T. 然 而 如 果 表 单 集对 象 的 Visible 属 性 设 置 为 假 ViewPort W idth 属 性 - 图81 .F. ViewPort W idth 属 性 - 图82 则 所 有 包 含 在 该 表 单 集 中 的表 单 对 象 都 不 可 见

示 例

ViewPort W idth 属 性 - 图83下面的示例演示了 Visible 属性在用 AddObject 方法加到表单之后 是如何用来显示控

ViewPort W idth 属 性 - 图84件的

ViewPort W idth 属 性 - 图85ViewPort W idth 属 性 - 图86ViewPort W idth 属 性 - 图87ViewPort W idth 属 性 - 图88ViewPort W idth 属 性 - 图89ViewPort W idth 属 性 - 图90ViewPort W idth 属 性 - 图91ViewPort W idth 属 性 - 图92ViewPort W idth 属 性 - 图93用 AddObject 方法可向表单中添加一个 线条 控件和三个命令按钮 将这些控件和按钮的 Visible 属性设置为 真 .T. 以便在表单中显示 Visible 属性也用来在

ViewPort W idth 属 性 - 图94ViewPort W idth 属 性 - 图95ViewPort W idth 属 性 - 图96ViewPort W idth 属 性 - 图97线条 控件的倾斜方向改变之前 隐藏它 并在其倾斜方向改变之后显示它

frmMyForm=CREATEOBJECT('Form')&& 创建一个表单

frmMyForm.Closable=.F.&& 废止控件菜单框

frmMyForm.AddObject('shpLine','Line')&& 在表单上添加线条控件frmMyForm.AddObject('cmdCmndBtn1','cmdMyCmndBtn1')&& 向上命令按钮frmMyForm.AddObject('cmdCmndBtn2','cmdMyCmndBtn2')&& 向下命令按钮frmMyForm.AddObject('cmdCmndBtn3','cmdMyCmndBtn3')&& 退出命令按钮

frmMyForm.shpLine.Visible =.T.&&使线条控件可见frmMyForm.shpLine.Top=20&& 指定线条控件起始点所在的行frmMyForm.shpLine.Left=125&& 指定线条控件起始点所在的列

frmMyForm.cmdCmndBtn1. Visible =.T.& &向上命令按钮可见frmMyForm.cmdCmndBtn2. Visible =.T.& &向下命令按钮可见frmMyForm.cmdCmndBtn3. Visible =.T.& &退出命令按钮可见

frmMyForm.SHOW&& 显示表单

READEVENTS&& 进入事件循环

DEFINECLASScmdMyCmndBtn1ASCOMMANDBUTTON&& 创建命令按钮

Caption='Slant\<Up'&& 命令按钮的标题Left=50&& 命令按钮起始点所在的列Top=100&& 命令按钮起始点所在的行Height=25&& 命令按钮高度

PROCEDURE Click

ThisForm.shpLine.Visible =.F.&& 隐藏线条控件ThisForm.shpLine.LineSlant='/'&& 向上倾斜ThisForm.shpLine.Visible =.T.&& 显示线条控件

ENDDEFINE

DEFINECLASScmdMyCmndBtn2ASCommandButton&& 创建命令按钮

Caption='Slant\<Down'&& 命令按钮的标题Left=200&& 命令按钮起始点所在的列Top=100&& 命令按钮起始点所在的行Height=25&& 命令按钮高度

PROCEDUREClick

ThisForm.shpLine.Visible =.F.&& 隐藏线条控件ThisForm.shpLine.LineSlant='\'&& 向下倾斜ThisForm.shpLine.Visible =.T.&& 显示线条控件

ENDDEFINE

DEFINECLASScmdMyCmndBtn3ASCommandButton&& 创建命令按钮

Caption='\<Quit'&& 命令按钮的标题Cancel=.T.&& 默认取消按钮 (Esc) Left=125&& 命令按钮起始点所在的列Top=150&& 命令按钮起始点所在的 行Height=25&& 命令按钮高度

PROCEDUREClick

ViewPort W idth 属 性 - 图98CLEAREVENTS&& 中止事件循环 关闭表单

ENDDEFINE

应 用 于

ViewPort W idth 属 性 - 图99ViewPort W idth 属 性 - 图100ViewPort W idth 属 性 - 图101ViewPort W idth 属 性 - 图102ViewPort W idth 属 性 - 图103ViewPort W idth 属 性 - 图104ViewPort W idth 属 性 - 图105ViewPort W idth 属 性 - 图106ViewPort W idth 属 性 - 图107ViewPort W idth 属 性 - 图108ViewPort W idth 属 性 - 图109ViewPort W idth 属 性 - 图110ViewPort W idth 属 性 - 图111ViewPort W idth 属 性 - 图112ViewPort W idth 属 性 - 图113ViewPort W idth 属 性 - 图114ViewPort W idth 属 性 - 图115ViewPort W idth 属 性 - 图116ViewPort W idth 属 性 - 图117ViewPort W idth 属 性 - 图118ViewPort W idth 属 性 - 图119ViewPort W idth 属 性 - 图120ViewPort W idth 属 性 - 图121ViewPort W idth 属 性 - 图122ViewPort W idth 属 性 - 图123复选框 列 组 合 框 命令按钮 命令组 容器对象 控件对象 编辑框 表单 表单集 表格 图像 标签 线条 列表框 OLE 绑定型控件 OLE 容器控件 选项按钮 选项组 页框 项目对象 _SCREEN 形状 微调 文本框 工具栏

请 参 阅

Show 方 法 , ZOrder 方 法