ブラウズするために様々な
注意事項
これは今のところ Windows OS でのみ実装されており、他のプラットフォームで作成すると Exception をスローします。
説明
この Graphic にはメニューや他のウェブ ブラウザの装飾もありません。新しいウィンドウを開くことは許可されません。セキュリティ上の理由から、ブラウザで表示されている Url のゲッターやイベントは特権アプレットでのみ利用可能です。
アプレットが EmbeddedBrowserGraphic を使用し終えた時は、EmbeddedBrowserGraphic.destroy-browser を呼び出す必要があります。
例
これは、Windows OS でのみ動作します。
| 例: EmbeddedBrowserGraphicを使用したmini Webブラウザ | |
 | |
{import * from CURL.GUI.EMBEDDED-BROWSER}
{def eb =
{try
{EmbeddedBrowserGraphic}
catch ex:Exception do
null
}
}
{VBox
{HBox
enabled? = (eb != null),
{CommandButton
label="<-",
{on Action do
{eb.browse-backward}
}
},
{CommandButton
label="->",
{on Action do
{eb.browse-forward}
}
},
{CommandButton
label="Reload",
{on Action do
{eb.browser-refresh force-reload? = true}
}
},
{CommandButton
label="Stop",
{on Action do
{eb.browser-stop}
}
},
{TextField
{on Action at tf:TextField do
{try
{eb.browse-url
{parse-url (tf.value asa String)}
}
catch ex:Exception do
{popup-message ex.message}
}
}
},
{CommandButton
label="+",
{on Action do
{eb.browser-zoom-in}
}
},
{CommandButton
label="-",
{on Action do
{eb.browser-zoom-out}
}
}
},
{if-non-null eb then
eb
else
{paragraph
EmbeddedBrowserGraphic is not supported on this platform.
}
}
}
|
導入:
バージョン 6.0