00001
00002
00003
#include "ab.h"
00004
00005 ULONGLONG
FAW(msProfSendMessage)(HDC hdc, ULONG Iter)
00006 {
00007
00008 HWND hwnd;
00009
INIT_TIMER;
00010
AW2(WNDCLASS) wc;
00011
00012 wc.style = 0;
00013 wc.lpfnWndProc = IF2(CreateDestroyWndProc, CreateDestroyWndProcW);
00014 wc.cbClsExtra = 0;
00015 wc.cbWndExtra = 0;
00016 wc.hInstance = ghinst;
00017 wc.hIcon = LoadIcon(ghinst, (LPSTR)IDUSERBENCH);
00018 wc.hCursor = LoadCursor(NULL, IDC_ARROW);
00019 wc.hbrBackground = (HBRUSH)(COLOR_APPWORKSPACE + 1);
00020 wc.lpszMenuName = NULL;
00021 wc.lpszClassName = L2("CreateDestroyWindow");
00022
00023 if (!AW2(RegisterClass)(&wc)) {
00024 MessageBox(NULL,
"18RegisterClass call failed.",
00025
"ERROR!", MB_OK);
00026
return (ULONGLONG)(0);
00027 }
00028
00029 hwnd =
AW2(CreateWindow)(
L2(
"CreateDestroyWindow"),
NULL, WS_CHILD,
00030 CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
00031
ghwndMDIClient,
NULL,
ghinst,
NULL);
00032
00033
START_TIMER;
00034
00035
while (ix--)
00036 {
00037
AW1(SendMessage)(hwnd, WM_SETTEXT, 0, (LPARAM)
L1(
"A fairly reasonable bit of text"));
00038 }
00039
00040
END_TIMER_NO_RETURN;
00041
00042
DestroyWindow(hwnd);
00043
AW2(UnregisterClass)(
L2(
"CreateDestroyWindow"),
ghinst);
00044
00045
RETURN_STOP_TIME;
00046
00047 }
00048
00049
#undef A1
00050
#undef A2