//-Object-oriented programming and VC ++ implementation

// -- Object-Oriented Programming and VC ++ implementation
// -- Liwei_6_1
// -- Win32 Program
// -- 12/3/2005 sat. Morning --
// -- Computer lab
# Include
Lresult callback wndproc (hwnd, uint, wparam, lparam );
//-----------
Int winapi winmain (hinstance, hinstance hprevinst,
Lpstr lpszcmdline, int ncmdshow)
{
Hwnd;
MSG;
Wndclass;
Char lpszclassname [] = "window ";
Char lpsztitle [] = "Information College of Chang 'an University ";
//-----
Wndclass. Style = 0;
Wndclass. lpfnwndproc = wndproc;
Wndclass. cbclsextra = 0;
Wndclass. cbwndextra = 0;
Wndclass. hinstance = hinstance;
Wndclass. hicon = loadicon (null, idi_application );
Wndclass. hcursor = loadcursor (null, idc_arrow );
Wndclass. hbrbackground = (hbrush) getstockobject (0 );
Wndclass. lpszmenuname = NULL;
Wndclass. lpszclassname = lpszclassname;
//-------
If (! Registerclass (& wndclass ))
{
Messagebeep (0 );
Return-1;
}
//-------
Hwnd = createwindow (lpszclassname,
Lpsztitle,
Ws_overlappedwindow,
Cw_usedefault,
Cw_usedefault,
Cw_usedefault,
Cw_usedefault,
Null,
Null,
Hinstance,
Null );
//----
Showwindow (hwnd, ncmdshow );
Updatewindow (hwnd );
While (getmessage (& MSG, 0, 0, 0 ))
{
Translatemessage (& MSG );
Dispatchmessage (& MSG );
}
Return msg. wparam;

}

Lresult callback wndproc (hwnd, uint message, wparam, lparam
Lparam)
{
Switch (Message)
{
Case wm_destroy:
Postquitmessage (0 );
Default:
Return defwindowproc (hwnd, message, wparam, lparam );
}
Return 0;
}