1
2 import "HHCTRL.OCX"
3 {
4 uint HtmlHelpW( uint, uint, uint, uint ) -> HtmlHelp
5 }
6
7 define
8 {
9 HH_DISPLAY_TOPIC = 0x0000
10 HH_DISPLAY_TOC = 0x0001
11 HH_DISPLAY_INDEX = 0x0002
12 }
13
14 type HelpManager
15 {
16 ustr HelpFile
17 }
18 /*
19 type htmlhelp
20 {
21 ustr pchmfile
22 }
23 */
24 /*func helpfile( str filename )
25 {
26 getmodulepath( chmfile, filename )
27 }
28 *//*
29 property htmlhelp.chmfile( ustr value )
30 {
31 .pchmfile = value
32 }
33
34 property str htmlhelp.chmfile<result>
35 {
36 result = .pchmfile
37 }
38
39 method uint htmlhelp.topic( ustr topic )
40 {
41 return HtmlHelp( 0, .pchmfile.ptr(), $HH_DISPLAY_TOPIC, topic.ptr() )
42 }
43
44 method uint htmlhelp.index
45 {
46 return HtmlHelp( 0, .pchmfile.ptr(), $HH_DISPLAY_INDEX, 0 )
47 }
48
49 method uint htmlhelp.helpcontents
50 {
51 return HtmlHelp( 0, .pchmfile.ptr(), $HH_DISPLAY_TOC, 0 )
52 }
53 */
54
55
56 method uint HelpManager.Topic( ustr topic )
57 {
58 return HtmlHelp( 0, .HelpFile.ptr(), $HH_DISPLAY_TOPIC, topic.ptr() )
59 }
60
61 method uint HelpManager.Index( )
62 {
63 return HtmlHelp( 0, .HelpFile.ptr(), $HH_DISPLAY_INDEX, 0 )
64 }
65
66 /*method uint HelpManager.Contents( ustr contents )
67 {
68 return HtmlHelp( 0, .HelpFile.ptr(), $HH_DISPLAY_TOC, contents.ptr() )
69 }*/