| author | Alex Gilkes <alex.gilkes@nokia.com> |
| Mon, 11 Jan 2010 14:00:40 +0000 | |
| changeset 0 | 1918ee327afb |
| permissions | -rw-r--r-- |
| 0 | 1 |
Sub QAxWidget2_Click |
2 |
QAxWidget2.lineWidth = QAxWidget2.lineWidth + 1 |
|
3 |
MainWindow.logMacro 0, "Hello from VBScript: QAxWidget2_Click", 0, "" |
|
4 |
End Sub |
|
5 |
||
6 |
Sub fatLines |
|
7 |
QAxWidget2.lineWidth = 25 |
|
8 |
End Sub |
|
9 |
||
10 |
Sub thinLines |
|
11 |
QAxWidget2.lineWidth = 1 |
|
12 |
End Sub |
|
13 |
||
14 |
Sub setLineWidth(width) |
|
15 |
QAxWidget2.lineWidth = width |
|
16 |
End Sub |
|
17 |
||
18 |
Public Function getLineWidth |
|
19 |
getLineWidth = QAxWidget2.lineWidth |
|
20 |
End Function |