source: trunk/Include/GdiPlusInit.ab @ 435

Last change on this file since 435 was 300, checked in by dai, 16 years ago

trunkディレクトリを作成。bin、Include、TestCaseをtrunkに移動した。
標準ライブラリのビルドバッチを追加。

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