MINERVA superseeded IF/Prolog.
Please see
http://www.ifcomputer.co.jp/MINERVA
for details.
We discontinued to sell IF/Prolog Dec 31. 2003.
For current customers, we continue to provide
professional support for IF/Prolog until Dec 31, 2008.
# xtWindow(?WidgetName, ?Window)
# xtWindowToWidget(?Window, ?WidgetName)
intrinsicsのXtWindow(), XtWindowToWidget()と同様の働きをします。
これらの述語はWidgetnameに対応するWindowを返したり、その逆を行います。ウインドウは整数値で、それはそのウインドウに対するXサ−バのIDです。デバッグの際に、xwininfoのようなXのユ−ティリティを使用したい場合など、ウインドウIDを知っていると便利なことがあります。同様にして、ウインドウIDから、対応するwidgetを探さなければならないこともあるでしょう。
widgetがまだPrologに登録されていない場合には、それに新しい一意名が与えられます。この名前は、通常通り以後の参照に使うことができます。これは、サブwidgetから成る複雑なwidgetを扱う場合に重要になります。
WidgetNameにもWindowにも値が与えられていない場合には、バックトラッキングを通じてPrologに登録されているすべてのwidgetのウインドウIDが返されます。
一致するwidgetが見つからない場合には、none(アトム)が返されます。
実現されていないwidgetのウインドウIDは0になります。このウインドウIDを持つウインドウは実際には存在しないことに注意して下さい。
?- xtWindow(Window, Widget).
Window =
Widget = xmPushButton_1;
Window =
Widget = applicationShell_1;
no
?- _
integer_expected 与えられている場合には、Windowは整数値でなければならない
widget_or_var_expected 与えられている場合には、WidgetNameはwidgetでなければならない
|