Программирование для IBM OS2


Приложение WINTREE - часть 4


WinMessageBox (HWND_DESKTOP, hWnd, szMsg, "Координаты курсора мыши (окно 1)", 0, MB_INFORMATION | MB_OK); }

default: return(WinDefWindowProc (hWnd, msg, mp1, mp2)); } }

// ================================================== // Функция второго окна приложения // ==================================================

MRESULT EXPENTRY WndProc2(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) { CHAR szMsg[100];

switch (msg) { case WM_ERASEBACKGROUND : return(MRFROMLONG(1L));

case WM_BUTTON1DOWN : { sprintf (szMsg, "(x, y) = (%ld, %ld)", SHORT1FROMMP (mp1), SHORT2FROMMP (mp1));

WinMessageBox (HWND_DESKTOP, hWnd, szMsg, "Координаты курсора мыши (окно 2)", 0, MB_INFORMATION | MB_OK); }

default: return(WinDefWindowProc (hWnd, msg, mp1, mp2)); } }

// ================================================== // Функция дочернего окна // ==================================================

MRESULT EXPENTRY WndProcChild(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2) { CHAR szMsg[100];

switch (msg) { case WM_ERASEBACKGROUND : return(MRFROMLONG(1L));

case WM_BUTTON1DOWN : { sprintf (szMsg, "(x, y) = (%ld, %ld)", SHORT1FROMMP (mp1), SHORT2FROMMP (mp1));

WinMessageBox (HWND_DESKTOP, hWnd, szMsg, "Координаты курсора мыши (дочернее окно)", 0, MB_INFORMATION | MB_OK); }

default: return(WinDefWindowProc (hWnd, msg, mp1, mp2)); } }




Начало  Назад  Вперед