long FAR PASCAL Wndfun(HWND hWnd,UINT mes, WPARAM wParam,LPARAM lParam)
{ HWND hcre,hin,hth,hex,hqu;
RECT w;
for(;;)
{
switch(mes)
{
case WM_DESTROY:
PostQuitMessage(0);
return 0;
case WM_COMMAND:
{
if(LOWORD(lParam)==(int)hcre) creatKB( );
if(LOWORD(lParam)==(int)hin) inputDB( );
if(LOWORD(lParam)==(int)hth) think( );
if(LOWORD(lParam)==(int)hex) explain( );
if(LOWORD(lParam)==(int)hqu)
{
freeKB(KnowledgeBase);
freeKB(Used);
freeDB(DataBase);
freeDB(Conclusion);
DestroyWindow(hWnd);
PostQuitMessage(0);
}
return(0);
}
case WM_CREATE:
GetClientRect(hWnd,&w);
hcre=CreateWindow("BUTTON","创建知识库",WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,40,30,100,25,hWnd,0, hCurInst, NULL);
hin=CreateWindow("BUTTON", "输入已知事实",WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,
40,6, 100,25,hWnd,1,hCurInst,NULL);
hth=CreateWindow("BUTTON","进行推理",WS_CHILD|
WS_VISIBLE|BS_PUSHBUTTON,40,90,100,25,hWnd,2,hCurInst,NULL);
hex=CreateWindow("BUTTON","解释",WS_CHILD|
WS_VISIBLE|BS_PUSHBUTTON,40,120,100,25,hWnd,3,hCurInst,NULL);

--------------------Configuration: 动物2 - Win32 Debug--------------------
Compiling...
动物.cpp
c:\program files\microsoft visual studio\myprojects\动物2\动物.cpp(123) : error C2664: 'CreateWindowExA' : cannot convert parameter 11 from 'void *' to 'struct HINSTANCE__ *'
Conversion from 'void*' to pointer to non-'void' requires an explicit cast
c:\program files\microsoft visual studio\myprojects\动物2\动物.cpp(134) : error C2664: 'CreateWindowExA' : cannot convert parameter 10 from 'const int' to 'struct HMENU__ *'
Conversion from integral type to pointer type requires reinterpret_cast, C-style cast or function-style cast
c:\program files\microsoft visual studio\myprojects\动物2\动物.cpp(136) : error C2664: 'CreateWindowExA' : cannot convert parameter 10 from 'const int' to 'struct HMENU__ *'
Conversion from integral type to pointer type requires reinterpret_cast, C-style cast or function-style cast
c:\program files\microsoft visual studio\myprojects\动物2\动物.cpp(138) : error C2664: 'CreateWindowExA' : cannot convert parameter 10 from 'const int' to 'struct HMENU__ *'
Conversion from integral type to pointer type requires reinterpret_cast, C-style cast or function-style cast
c:\program files\microsoft visual studio\myprojects\动物2\动物.cpp(140) : error C2664: 'CreateWindowExA' : cannot convert parameter 10 from 'const int' to 'struct HMENU__ *'
Conversion from integral type to pointer type requires reinterpret_cast, C-style cast or function-style cast