source: trunk/tools/activeqt/testcon/scripts/vbscript.vbs@ 853

Last change on this file since 853 was 2, checked in by Dmitry A. Kuminov, 16 years ago

Initially imported qt-all-opensource-src-4.5.1 from Trolltech.

File size: 390 bytes
Line 
1Sub QAxWidget2_Click
2 QAxWidget2.lineWidth = QAxWidget2.lineWidth + 1
3 MainWindow.logMacro 0, "Hello from VBScript: QAxWidget2_Click", 0, ""
4End Sub
5
6Sub fatLines
7 QAxWidget2.lineWidth = 25
8End Sub
9
10Sub thinLines
11 QAxWidget2.lineWidth = 1
12End Sub
13
14Sub setLineWidth(width)
15 QAxWidget2.lineWidth = width
16End Sub
17
18Public Function getLineWidth
19 getLineWidth = QAxWidget2.lineWidth
20End Function
Note: See TracBrowser for help on using the repository browser.