Page History
[ 
|../../index.htm#lansa/ladtgub3_0320.htm]
現在地:
...
8.4.7 *IsEqualTo演算子と*IsOfType演算子
*IS演算子と*ISNOT演算子の場合と同じように、*IsEqualTo、*IsNotEqualTo、*IsOfType、*IsNotOfTypeの各演算子を使用して、コンポーネント参照変数をテストできます。 If
If (#COM_
...
OWNER *IsEqualTo #Phbn_1.Parent)
...
Use Builtin(Ov_Message_box)
...
With_Args("3.
...
#COM_OWNER is equal to #PHBN_1.Parent")
...
Endif
If (#COM_
...
OWNER *IsNotEqualTo #Phbn_1)
...
Use Builtin(Ov_Message_box)
...
With_Args("4.
...
#COM_OWNER is not equal to #PHBN_1")
...
Endif
If (#COM_
...
OWNER *IsOfType #AADFORM22)
Use Builtin(Ov_Message_box)
...
With_Args("5.
...
#COM_OWNER is of type #AADFORM22")
Endif
If (#COM_
...
OWNER *IsNotOfType #PRIM_PHBN)
...
Use Builtin(Ov_Message_box)
...
With_Args("6.
...
#COM_OWNER is not of type #PRIM_PHBN")
...
Endif