source: trunk/ab5.0/ablib/src/GdiPlusInit.ab @ 560

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

インクルードガードとその他不要な前処理定義などの削除

File size: 1.3 KB
Line 
1' GdiPlusInit.ab
2
3Enum DebugEventLevel
4    DebugEventLevelFatal
5    DebugEventLevelWarning
6End Enum
7
8Typedef DebugEventProc = *Sub(level As DebugEventLevel, message As *CHAR)
9
10Typedef NotificationHookProc = *Function(/*OUT*/ ByRef token As ULONG_PTR) As Status
11TypeDef NotificationUnhookProc = *Sub(ByVal token As ULONG_PTR)
12
13Type GdiplusStartupInput
14'Class GdiplusStartupInput
15'Public
16    GdiplusVersion As DWord
17    DebugEventCallback As DebugEventProc
18    SuppressBackgroundThread As BOOL
19    SuppressExternalCodecs As BOOL
20
21'   Sub GdiplusStartupInput()(debugEventCallback As DebugEventProc, suppressBackgroundThread As BOOL, suppressExternalCodecs As BOOL)
22'       GdiplusVersion = 1
23'       DebugEventCallback = debugEventCallback
24'       SuppressBackgroundThread = suppressBackgroundThread
25'       SuppressExternalCodecs = suppressExternalCodecs
26'   End Sub
27'End Class
28End Type
29
30Type Align(8) GdiplusStartupOutput
31    NotificationHook As NotificationHookProc
32    NotificationUnhook As NotificationUnhookProc
33End Type
34
35Declare Function GdiplusStartup Lib "GdiPlus.dll" (
36    /*OUT*/ ByRef token As ULONG_PTR,
37            ByRef input As GdiplusStartupInput,
38    /*OUT*/ ByVal output As *GdiplusStartupOutput) As Status
39
40Declare Sub GdiplusShutdown Lib "GdiPlus.dll" (ByVal token As ULONG_PTR)
Note: See TracBrowser for help on using the repository browser.