|
Last change
on this file since 478 was 473, checked in by イグトランス (egtra), 16 years ago |
|
実験として書いていたControlクラスを追加（せめてコミット前に既存のContorolに混ぜようとしたがコンパイルできなかった）。
ほかForms, Drawing及びGDI+の修正。
|
|
File size:
1.4 KB
|
| Line | |
|---|
| 1 | ' GdiPlusTypes.sbp
|
|---|
| 2 |
|
|---|
| 3 | #ifndef __GDIPLUSTYPES_AB__
|
|---|
| 4 | #define __GDIPLUSTYPES_AB__
|
|---|
| 5 |
|
|---|
| 6 | TypeDef ImageAbort = *Function(p As VoidPtr) As BOOL
|
|---|
| 7 | TypeDef DrawImageAbort = ImageAbort
|
|---|
| 8 | TypeDef GetThumbnailImageAbort = ImageAbort
|
|---|
| 9 |
|
|---|
| 10 | TypeDef EnumerateMetafileProc = *Function(recordType As EmfPlusRecordType, flags As DWord, dataSize As DWord, data As *Byte, callbackData As VoidPtr) As BOOL
|
|---|
| 11 |
|
|---|
| 12 | 'Const REAL_MAX = FLT_MAX
|
|---|
| 13 | 'Const REAL_MIN = FLT_MIN
|
|---|
| 14 | 'Const REAL_TOLERANCE = (FLT_MIN * 100)
|
|---|
| 15 | 'Const REAL_EPSILON = 1.192092896e-07 'FLT_EPSILON
|
|---|
| 16 |
|
|---|
| 17 | Const Enum Status
|
|---|
| 18 | Ok = 0
|
|---|
| 19 | GenericError = 1
|
|---|
| 20 | InvalidParameter = 2
|
|---|
| 21 | OutOfMemory = 3
|
|---|
| 22 | ObjectBusy = 4
|
|---|
| 23 | InsufficientBuffer = 5
|
|---|
| 24 | NotImplemented = 6
|
|---|
| 25 | Win32Error = 7
|
|---|
| 26 | WrongState = 8
|
|---|
| 27 | Aborted = 9
|
|---|
| 28 | FileNotFound = 10
|
|---|
| 29 | ValueOverflow = 11
|
|---|
| 30 | AccessDenied = 12
|
|---|
| 31 | UnknownImageFormat = 13
|
|---|
| 32 | FontFamilyNotFound = 14
|
|---|
| 33 | FontStyleNotFound = 15
|
|---|
| 34 | NotTrueTypeFont = 16
|
|---|
| 35 | UnsupportedGdiplusVersion = 17
|
|---|
| 36 | GdiplusNotInitialized = 18
|
|---|
| 37 | PropertyNotFound = 19
|
|---|
| 38 | PropertyNotSupported = 20
|
|---|
| 39 | End Enum
|
|---|
| 40 |
|
|---|
| 41 | Class PathData
|
|---|
| 42 | /*
|
|---|
| 43 | Public
|
|---|
| 44 | Sub PathData()
|
|---|
| 45 | Count = 0
|
|---|
| 46 | Points = NULL
|
|---|
| 47 | Types = NULL
|
|---|
| 48 | End Sub
|
|---|
| 49 |
|
|---|
| 50 | Sub ~PathData()
|
|---|
| 51 | If Points <> NULL Then
|
|---|
| 52 | Delete Points
|
|---|
| 53 | End If
|
|---|
| 54 | If Types <> NULL Then
|
|---|
| 55 | Delete Types
|
|---|
| 56 | End Sub
|
|---|
| 57 |
|
|---|
| 58 | Public
|
|---|
| 59 | Count As Long
|
|---|
| 60 | Points As *PointF
|
|---|
| 61 | Types As *BYTE
|
|---|
| 62 | */
|
|---|
| 63 | End Class
|
|---|
| 64 |
|
|---|
| 65 |
|
|---|
| 66 | #endif '__GDIPLUSTYPES_AB__
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
