Ring 1.10 以来となる開発環境の日本語ローカライズ版 (評価版) を追加 (ノートパッド、フォームデザイナー、対話型実行環境、ファイルの検索)。

[ring-lang-081/ring.git] / applications / rnote / source / rnotewebbrowser.ring

diff --git a/applications/rnote/source/rnotewebbrowser.ring b/applications/rnote/source/rnotewebbrowser.ring
new file mode 100644 (file)
index 0000000..fd8bae0
--- /dev/null
+++ b/applications/rnote/source/rnotewebbrowser.ring
@@ -0,0 +1,22 @@
+# The Ring Notepad Application (RNote)
+# Author : Mahmoud Fayed <msfclipper@yahoo.com>
+
+class RNoteWebBrowser
+
+       func WebGo
+               cWebsite = oWBText.text()
+               oWebView.LoadPage( new qurl( cWebSite ) )
+
+       func WebBack
+               oWebView.Back()
+
+       func SetWebsite
+               oWebView { loadpage(new qurl(this.cWebSite)) }
+               oWBText  { setText(this.cWebSite) }
+
+       func BrowserLink x
+               cLink = aBrowserLinks[x][2]
+               oWebView { loadpage(new qurl(cLink)) }
+               oWBText  { setText(cLink) }
+               oDockWebBrowser.Show()
+               oDockWebBrowser.raise()