summaryrefslogtreecommitdiffstats
path: root/tools/activeqt/testcon/scripts/vbscript.vbs
diff options
context:
space:
mode:
authorLars Knoll <lars.knoll@nokia.com>2009-03-23 09:18:55 (GMT)
committerSimon Hausmann <simon.hausmann@nokia.com>2009-03-23 09:18:55 (GMT)
commite5fcad302d86d316390c6b0f62759a067313e8a9 (patch)
treec2afbf6f1066b6ce261f14341cf6d310e5595bc1 /tools/activeqt/testcon/scripts/vbscript.vbs
downloadQt-e5fcad302d86d316390c6b0f62759a067313e8a9.zip
Qt-e5fcad302d86d316390c6b0f62759a067313e8a9.tar.gz
Qt-e5fcad302d86d316390c6b0f62759a067313e8a9.tar.bz2
Long live Qt 4.5!
Diffstat (limited to 'tools/activeqt/testcon/scripts/vbscript.vbs')
-rw-r--r--tools/activeqt/testcon/scripts/vbscript.vbs20
1 files changed, 20 insertions, 0 deletions
diff --git a/tools/activeqt/testcon/scripts/vbscript.vbs b/tools/activeqt/testcon/scripts/vbscript.vbs
new file mode 100644
index 0000000..bd29f19
--- /dev/null
+++ b/tools/activeqt/testcon/scripts/vbscript.vbs
@@ -0,0 +1,20 @@
+Sub QAxWidget2_Click
+ QAxWidget2.lineWidth = QAxWidget2.lineWidth + 1
+ MainWindow.logMacro 0, "Hello from VBScript: QAxWidget2_Click", 0, ""
+End Sub
+
+Sub fatLines
+ QAxWidget2.lineWidth = 25
+End Sub
+
+Sub thinLines
+ QAxWidget2.lineWidth = 1
+End Sub
+
+Sub setLineWidth(width)
+ QAxWidget2.lineWidth = width
+End Sub
+
+Public Function getLineWidth
+ getLineWidth = QAxWidget2.lineWidth
+End Function