c6a9cd69c2
* NEW: Add examples again. I hope correctly this time. git-svn-id: svn://localhost/gambas/trunk@6726 867c0c6c-44f3-4631-809d-bfa615b0a4ec
10 lines
223 B
Text
10 lines
223 B
Text
Public Sub Example22()
|
|
|
|
Paint.Background = Color.RGB(128, 128, 255)
|
|
Paint.Rectangle(32, 32, 192, 192, 32)
|
|
Paint.Fill(True)
|
|
Paint.Background = Color.RGB(128, 0, 0, 128)
|
|
Paint.LineWidth = 10
|
|
Paint.Stroke
|
|
|
|
End
|