W P A R E N T 函 数

返回活动窗口或指定窗口的父窗口名

语 法

WPARENT([ W indowNam e ])

返 值 类 型

字符型

参 数 描 述

W indowName

指 定 一 个 窗 口 由 WPARENT ( ) 返 回 其 父 窗 口 名 如 果 指 定 窗 口 没 有 父 窗 口 则 WPARENT( ) 返 回 空 字 符 串 如 果 省 略 WindowName 则 该 函 数 返 回

活 动 输 出 窗 口 的 父 窗 口 名 如 果 活 动 输 出 窗 口 没 有 父 窗 口 WPARETNT( ) 返回 空 字 符 串

说 明

可以用 DEFINE WINDOW 命令创建窗口 并将其放置在父窗口之内 该子窗口和父窗口结合在一起 例如 在父窗口中创建并激活的子窗口不能移出父窗口 如果父窗口移动 子窗口也随着移动

示 例

下面的示例定义了一个父窗口和子窗口 然后用 WPAREN T( ) 来确定谁是父窗口

CLEAR ALL CLEAR

DEFINE WINDOW wParent ; FROM 1,1 TO 20,20 ;

TITLE 'wParent' && 父窗口

ACTIVATE WINDOW wParent DEFINE WINDOW wChild ;

FROM 1,1 TO 10,10 ;

TITLE 'wChild' ;

IN WINDOW wParent && 子窗口

ACTIVATE WINDOW wChild

WAIT WINDOW 'The parent window is ' + WPARENT( )

RELEASE WINDOW wParent, wChild

请 参 阅

ACTIVATE WINDOW, DEFINE WINDOW, WCHILD ( )