home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Microsoft Programmer's Library 1.3
/
Microsoft-Programers-Library-v1.3.iso
/
sampcode
/
win_lrn
/
string
/
extexto.c
< prev
next >
Wrap
C/C++ Source or Header
|
1988-08-10
|
4KB
|
137 lines
/*
* Function Name: ExtTextOut
* Program Name: extexto.c
* SDK Version: 2.03
* Runtime Version: 2.03
* Microsoft C Version: 5.1
*
* Description:
* The program below will display text in the given rectangular region.
*/
#include "windows.h"
long FAR PASCAL WndProc(HWND, unsigned, WORD, LONG);
/***********************************************************************/
void CALL_ExtTextOut(hWnd, hDC)
HWND hWnd;
HDC hDC;
{
RECT rTextRect;
BOOL bDrawn;
rTextRect.left = 0;
rTextRect.top = 0;
rTextRect.right = 350;
rTextRect.bottom = 25;
/* function demonstrated */
bDrawn = ExtTextOut (hDC, 10, 10, ETO_CLIPPED, (LPRECT) &rTextRect,
(LPSTR) "Sample showing ExtTextOut", 25, (LPINT) NULL);
if (bDrawn == FALSE)
MessageBox(hWnd, (LPSTR)"ExtTextOut failed", (LPSTR)"ERROR", MB_ICONHAND);
return;
}
/**************************************************************************/
/* Procedure called when the application is loaded for the first time */
BOOL WinInit( hInstance )
HANDLE hInstance;
{
WNDCLASS wcClass;
wcClass.style = CS_HREDRAW | CS_VREDRAW;
wcClass.lpfnWndProc = WndProc;
wcClass.cbClsExtra =0;
wcClass.cbWndExtra =0;
wcClass.hInstance = hInstance;
wcClass.hIcon = LoadIcon( hInstance,NULL );
wcClass.hCursor = LoadCursor( NULL, IDC_ARROW ); /* black brush */
wcClass.hbrBackground = (HBRUSH)GetStockObject( BLACK_BRUSH );
wcClass.lpszMenuName = (LPSTR)NULL;
wcClass.lpszClassName = (LPSTR)"ExtTextOut";
if (!RegisterClass( (LPWNDCLASS)&wcClass ) )
/* Initialization failed.
* Windows will automatically deallocate all allocated memory.
*/
return FALSE;
return TRUE; /* Initialization succeeded */
}
int PASCAL WinMain( hInstance, hPrevInstance, lpszCmdLine, cmdShow )
HANDLE hInstance, hPrevInstance;
LPSTR lpszCmdLine;
int cmdShow;
{
MSG msg;
HWND hWnd;
if (!hPrevInstance)
{
/* Call initialization procedure if this is the first instance */
if (!WinInit( hInstance ))
return FALSE;
}
hWnd = CreateWindow((LPSTR)"ExtTextOut",
(LPSTR)"ExtTextOut()",
WS_OVERLAPPEDWINDOW,
CW_USEDEFAULT,
CW_USEDEFAULT,
CW_USEDEFAULT,
CW_USEDEFAULT,
(HWND)NULL, /* no parent */
(HMENU)NULL, /* use class menu */
(HANDLE)hInstance, /* handle to window instance */
(LPSTR)NULL /* no params to pass on */
);
/* Make window visible according to the way the app is activated */
ShowWindow( hWnd, cmdShow );
UpdateWindow( hWnd );
/* Polling messages from event queue */
while (GetMessage((LPMSG)&msg, NULL, 0, 0))
{
TranslateMessage((LPMSG)&msg);
DispatchMessage((LPMSG)&msg);
}
return (int)msg.wParam;
}
/* Procedures which make up the window class. */
long FAR PASCAL WndProc( hWnd, message, wParam, lParam )
HWND hWnd;
unsigned message;
WORD wParam;
LONG lParam;
{
PAINTSTRUCT ps;
switch (message)
{
case WM_PAINT:
BeginPaint( hWnd, (LPPAINTSTRUCT)&ps );
CALL_ExtTextOut(hWnd, ps.hdc);
EndPaint( hWnd, (LPPAINTSTRUCT)&ps );
break;
case WM_DESTROY:
PostQuitMessage( 0 );
break;
default:
return DefWindowProc( hWnd, message, wParam, lParam );
break;
}
return(0L);
}