Line | |
---|
1 | ' Classes/System/Drawing/misc.ab
|
---|
2 |
|
---|
3 | Namespace System
|
---|
4 | Namespace Drawing
|
---|
5 |
|
---|
6 | Enum RotateFlipType
|
---|
7 | RotateNoneFlipNone = 0
|
---|
8 | Rotate90FlipNone = 1
|
---|
9 | Rotate180FlipNone = 2
|
---|
10 | Rotate270FlipNone = 3
|
---|
11 |
|
---|
12 | RotateNoneFlipX = 4
|
---|
13 | Rotate90FlipX = 5
|
---|
14 | Rotate180FlipX = 6
|
---|
15 | Rotate270FlipX = 7
|
---|
16 |
|
---|
17 | RotateNoneFlipY = 6
|
---|
18 | Rotate90FlipY = 7
|
---|
19 | Rotate180FlipY = 4
|
---|
20 | Rotate270FlipY = 5
|
---|
21 |
|
---|
22 | RotateNoneFlipXY = 2
|
---|
23 | Rotate90FlipXY = 3
|
---|
24 | Rotate180FlipXY = 0
|
---|
25 | Rotate270FlipXY = 1
|
---|
26 | End Enum
|
---|
27 |
|
---|
28 | Enum GraphicsUnit
|
---|
29 | World = 0
|
---|
30 | Display = 1
|
---|
31 | Pixel = 2
|
---|
32 | Point = 3
|
---|
33 | Inch = 4
|
---|
34 | Document = 5
|
---|
35 | Millimeter = 6
|
---|
36 | End Enum
|
---|
37 |
|
---|
38 | Enum FontStyle
|
---|
39 | Regular = 0
|
---|
40 | Bold = 1
|
---|
41 | Italic = 2
|
---|
42 | Strikeout = 4
|
---|
43 | Underline = 8
|
---|
44 | End Enum
|
---|
45 |
|
---|
46 | Enum TextRenderingHint
|
---|
47 | TextRenderingHintSystemDefault = 0
|
---|
48 | TextRenderingHintSingleBitPerPixelGridFit
|
---|
49 | TextRenderingHintSingleBitPerPixel
|
---|
50 | TextRenderingHintAntiAliasGridFit
|
---|
51 | TextRenderingHintAntiAlias
|
---|
52 | TextRenderingHintClearTypeGridFit
|
---|
53 | End Enum
|
---|
54 |
|
---|
55 | Enum StringFormatFlags
|
---|
56 | DirectionRightToLeft = &h00000001
|
---|
57 | DirectionVertical = &h00000002
|
---|
58 | NoFitBlackBox = &h00000004
|
---|
59 | DisplayFormatControl = &h00000020
|
---|
60 | NoFontFallback = &h00000400
|
---|
61 | MeasureTrailingSpaces = &h00000800
|
---|
62 | NoWrap = &h00001000
|
---|
63 | LineLimit = &h00002000
|
---|
64 | NoClip = &h00004000
|
---|
65 | End Enum
|
---|
66 |
|
---|
67 | Enum StringTrimming
|
---|
68 | None = 0
|
---|
69 | Character = 1
|
---|
70 | Word_ = 2
|
---|
71 | EllipsisCharacter = 3
|
---|
72 | EllipsisWord = 4
|
---|
73 | EllipsisPath = 5
|
---|
74 | End Enum
|
---|
75 |
|
---|
76 | Enum StringDigitSubstitute
|
---|
77 | User = 0
|
---|
78 | None = 1
|
---|
79 | National = 2
|
---|
80 | Traditional = 3
|
---|
81 | End Enum
|
---|
82 |
|
---|
83 | Enum StringAlignment
|
---|
84 | Near = 0
|
---|
85 | Center = 1
|
---|
86 | Far = 2
|
---|
87 | End Enum
|
---|
88 |
|
---|
89 | Namespace Detail
|
---|
90 | Sub ThrowGdiplusException(status As Status)
|
---|
91 | Select Case status
|
---|
92 | Case Ok
|
---|
93 | Exit Sub
|
---|
94 | ' Case OutOfMemory
|
---|
95 | ' Throw New System.OutOfMemroyException("GDI+")
|
---|
96 | Case NotImplemented
|
---|
97 | Throw New System.NotImplementedException("GDI+")
|
---|
98 | ' Case FileNotFoundException
|
---|
99 | ' Throw New System.IO.FileNotFoundException("GDI+")
|
---|
100 | Case Else
|
---|
101 | Throw New System.Exception("GDI+")
|
---|
102 | End Select
|
---|
103 | End Sub
|
---|
104 | End Namespace
|
---|
105 |
|
---|
106 | Sub SetStatus(status As Status)
|
---|
107 | Detail.ThrowGdiplusException(status)
|
---|
108 | End Sub
|
---|
109 |
|
---|
110 | End Namespace
|
---|
111 | End Namespace
|
---|
Note:
See
TracBrowser
for help on using the repository browser.