home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Microsoft Programmer's Library 1.3
/
Microsoft-Programers-Library-v1.3.iso
/
sampcode
/
win_lrn
/
dialog
/
dlgtext.c
< prev
next >
Wrap
C/C++ Source or Header
|
1988-08-10
|
3KB
|
116 lines
/*
* SetDlgItemText
* This program demonstrates the use of the function SetDlgItemText.
* It sets the caption or text of a dialog item (control) in the dialog
* box.
*/
#include "windows.h"
#include "dlgtext.h"
HANDLE hInst;
FARPROC lpprocEdit;
long FAR PASCAL SampleWndProc (HWND, unsigned, WORD, LONG);
BOOL FAR PASCAL EditProc (HWND, unsigned, WORD, LONG);
int PASCAL WinMain (hInstance, hPrevInstance, lpszCmdLine, cmdShow)
HANDLE hInstance, hPrevInstance;
LPSTR lpszCmdLine;
int cmdShow;
{
MSG msg;
HWND hWnd;
WNDCLASS wcClass;
if (!hPrevInstance)
{
wcClass.style = CS_HREDRAW | CS_VREDRAW;
wcClass.lpfnWndProc = SampleWndProc;
wcClass.cbClsExtra = 0;
wcClass.cbWndExtra = 0;
wcClass.hInstance = hInstance;
wcClass.hCursor = LoadCursor (NULL, IDC_ARROW);
wcClass.hIcon = LoadIcon (hInstance, "WindowIcon");
wcClass.hbrBackground = (HBRUSH)GetStockObject (WHITE_BRUSH);
wcClass.lpszMenuName = MAKEINTRESOURCE (DIALOGMENU);
wcClass.lpszClassName = "dlgtext";
if (!RegisterClass (&wcClass))
return FALSE;
}
hWnd = CreateWindow ("dlgtext",
(LPSTR)"Sending Text",
WS_OVERLAPPEDWINDOW,
50,
50,
600,
250,
NULL,
NULL,
hInstance,
NULL);
hInst = hInstance;
ShowWindow (hWnd, cmdShow);
UpdateWindow (hWnd);
while (GetMessage (&msg, NULL, 0, 0))
{
TranslateMessage (&msg);
DispatchMessage (&msg);
}
return msg.wParam;
}
long FAR PASCAL SampleWndProc (hWnd, message, wParam, lParam)
HWND hWnd;
unsigned message;
WORD wParam;
LONG lParam;
{
switch (message)
{
case WM_COMMAND:
if (wParam == ID_DIALOG)
{
lpprocEdit = MakeProcInstance ( (FARPROC) EditProc, hInst);
DialogBox (hInst, MAKEINTRESOURCE (EDITBOX), hWnd, lpprocEdit);
FreeProcInstance ( (FARPROC) lpprocEdit);
}
break;
default:
return DefWindowProc (hWnd, message, wParam, lParam);
}
return (0L);
}
BOOL FAR PASCAL EditProc (hDlg, message, wParam, lParam)
HWND hDlg;
unsigned message;
WORD wParam;
LONG lParam;
{
switch (message)
{
case WM_INITDIALOG:
SetDlgItemText (hDlg, ID_EDITBOX, (LPSTR)"Text Received!!");
return TRUE;
break;
case WM_COMMAND:
if (wParam == IDOK)
{
EndDialog (hDlg, TRUE);
return TRUE;
break;
}
break;
default:
return FALSE;
}
return TRUE;
}