source: trunk/ab5.0/ablib/src/GdiPlusTypes.ab

Last change on this file was 698, checked in by イグトランス (egtra), 15 years ago

GDI+をコンパイルできるように修正。FontFamily, Penの追加。サンプルとして、Step 32のGDI+版を制作。
(#56)

File size: 1.1 KB
Line 
1' GdiPlusTypes.sbp
2
3TypeDef ImageAbort = *Function(p As VoidPtr) As BOOL
4TypeDef DrawImageAbort = ImageAbort
5TypeDef GetThumbnailImageAbort = ImageAbort
6
7'Const REAL_MAX = FLT_MAX
8'Const REAL_MIN = FLT_MIN
9'Const REAL_TOLERANCE = (FLT_MIN * 100)
10'Const REAL_EPSILON = 1.192092896e-07 'FLT_EPSILON
11
12Const Enum Status
13 Ok = 0
14 GenericError = 1
15 InvalidParameter = 2
16 OutOfMemory = 3
17 ObjectBusy = 4
18 InsufficientBuffer = 5
19 NotImplemented = 6
20 Win32Error = 7
21 WrongState = 8
22 Aborted = 9
23 FileNotFound = 10
24 ValueOverflow = 11
25 AccessDenied = 12
26 UnknownImageFormat = 13
27 FontFamilyNotFound = 14
28 FontStyleNotFound = 15
29 NotTrueTypeFont = 16
30 UnsupportedGdiplusVersion = 17
31 GdiplusNotInitialized = 18
32 PropertyNotFound = 19
33 PropertyNotSupported = 20
34End Enum
35
36Type PathData
37/*
38Public
39 Sub PathData()
40 Count = 0
41 Points = NULL
42 Types = NULL
43 End Sub
44
45 Sub ~PathData()
46 If Points <> NULL Then
47 Delete Points
48 End If
49 If Types <> NULL Then
50 Delete Types
51 End Sub
52
53Public
54*/
55 Count As Long
56 Points As *GpPointF
57 Types As *BYTE
58End Type
Note: See TracBrowser for help on using the repository browser.