OSDN Git Service

Initial Commit
[qcad/qcad.git] / qcadwin / HHelp.cpp
1 //---------------------------------------------------------------------------\r
2 // HTML\83w\83\8b\83v\82ð\95\\8e¦\82·\82é\8aÖ\90\94\r
3 //---------------------------------------------------------------------------\r
4 #include <vcl.h>\r
5 #pragma hdrstop\r
6 \r
7 #include "htmlhelp.h"\r
8 #include "HHelp.h"\r
9 \r
10 //---------------------------------------------------------------------------\r
11 #pragma package(smart_init)\r
12 //---------------------------------------------------------------------------\r
13 Htmlhelp::Htmlhelp(void){\r
14   Handle = LoadLibrary("HHCTRL.OCX");\r
15   if(Handle==NULL) {\r
16     ShowMessage("HHCTRL.OCX\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ");\r
17     return;\r
18   }\r
19 }\r
20 //---------------------------------------------------------------------------\r
21 Htmlhelp::~Htmlhelp(void){\r
22   FreeLibrary(Handle);\r
23 }\r
24 //---------------------------------------------------------------------------\r
25 void\r
26 Htmlhelp::ShowHtmlHelp(HWND handle,char *helpfile) {\r
27   typedef HWND (WINAPI *FPHH) (HWND, LPCSTR, UINT, DWORD);\r
28   if(Handle == NULL){\r
29     return;\r
30   }\r
31   FPHH htmlHelp = (FPHH)GetProcAddress(Handle,"HtmlHelpA");\r
32   if(htmlHelp==NULL){\r
33     ShowMessage("HtmlHelpA\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ");\r
34     return;\r
35   }\r
36   htmlHelp(handle,helpfile, HH_DISPLAY_TOPIC, NULL);\r
37 }\r
38 //---------------------------------------------------------------------------\r
39 void\r
40 Htmlhelp::ShowHtmlHelpSearch(HWND handle,char *helpfile,char *keyword) {\r
41   typedef HWND (WINAPI *FPHH) (HWND, LPCSTR, UINT,DWORD);\r
42   if(Handle == NULL){\r
43     return;\r
44   }\r
45   FPHH htmlHelp= (FPHH)GetProcAddress(Handle,"HtmlHelpA");\r
46   if(htmlHelp==NULL){\r
47     ShowMessage("HtmlHelpA\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ");\r
48     return;\r
49   }\r
50   HH_AKLINK link;\r
51   link.cbStruct =     sizeof(HH_AKLINK) ;\r
52   link.fReserved =    FALSE ;\r
53   link.pszKeywords =  keyword;\r
54   link.pszUrl =       NULL ;\r
55   link.pszMsgText =   NULL ;\r
56   link.pszMsgTitle =  NULL ;\r
57   link.pszWindow =    NULL ;\r
58   link.fIndexOnFail = TRUE ;\r
59   htmlHelp(handle,helpfile, HH_KEYWORD_LOOKUP, (DWORD)&link);\r
60 }\r
61 //---------------------------------------------------------------------------\r