ultimatepp/uppsrc/CtrlCore/Win32Proc.cpp
cxl 5bc4645d8d win32 caret refactored to improve the feel when moving (avoided hiding due to blinking)
git-svn-id: svn://ultimatepp.org/upp/trunk@7468 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2014-06-25 10:48:54 +00:00

510 lines
14 KiB
C++

#include "CtrlCore.h"
#ifdef GUI_WIN
#include <winnls.h>
//#include "imm.h"
NAMESPACE_UPP
#define LLOG(x) // DLOG(x)
dword Ctrl::KEYtoK(dword chr) {
if(chr == VK_TAB)
chr = K_TAB;
else
if(chr == VK_SPACE)
chr = K_SPACE;
else
if(chr == VK_RETURN)
chr = K_RETURN;
else
chr = chr + K_DELTA;
if(chr == K_ALT_KEY || chr == K_CTRL_KEY || chr == K_SHIFT_KEY)
return chr;
if(GetCtrl()) chr |= K_CTRL;
if(GetAlt()) chr |= K_ALT;
if(GetShift()) chr |= K_SHIFT;
return chr;
}
class NilDrawFull : public NilDraw {
virtual bool IsPaintingOp(const Rect& r) const { return true; }
};
#ifdef PLATFORM_WINCE
bool GetShift() { return false; }
bool GetCtrl() { return false; }
bool GetAlt() { return false; }
bool GetCapsLock() { return false; }
bool wince_mouseleft;
bool wince_mouseright;
bool GetMouseLeft() { return wince_mouseleft; }
bool GetMouseRight() { return wince_mouseright; }
bool GetMouseMiddle() { return false; }
Point wince_mousepos = Null;
Point GetMousePos() {
return wince_mousepos;
}
void SetWinceMouse(HWND hwnd, LPARAM lparam)
{
Point p(lparam);
ClientToScreen(hwnd, p);
wince_mousepos = p;
}
#else
void SetWinceMouse(HWND hwnd, LPARAM lparam) {}
bool GetShift() { return !!(GetKeyState(VK_SHIFT) & 0x8000); }
bool GetCtrl() { return !!(GetKeyState(VK_CONTROL) & 0x8000); }
bool GetAlt() { return !!(GetKeyState(VK_MENU) & 0x8000); }
bool GetCapsLock() { return !!(GetKeyState(VK_CAPITAL) & 1); }
bool GetMouseLeft() { return !!(GetKeyState(VK_LBUTTON) & 0x8000); }
bool GetMouseRight() { return !!(GetKeyState(VK_RBUTTON) & 0x8000); }
bool GetMouseMiddle() { return !!(GetKeyState(VK_MBUTTON) & 0x8000); }
#endif
void AvoidPaintingCheck__()
{
Ctrl::painting = false;
}
bool PassWindowsKey(int wParam);
LRESULT Ctrl::WindowProc(UINT message, WPARAM wParam, LPARAM lParam) {
GuiLock __;
eventid++;
ASSERT_(!painting || IsPanicMode(), "WindowProc invoked for " + Name() + " while in Paint routine");
// LLOG("Ctrl::WindowProc(" << message << ") in " << ::Name(this) << ", focus " << (void *)::GetFocus());
Ptr<Ctrl> _this = this;
HWND hwnd = GetHWND();
switch(message) {
case WM_PALETTECHANGED:
if((HWND)wParam == hwnd)
break;
#ifndef PLATFORM_WINCE
case WM_QUERYNEWPALETTE:
if(!SystemDraw::AutoPalette()) break;
{
HDC hDC = GetDC(hwnd);
HPALETTE hOldPal = SelectPalette(hDC, GetQlibPalette(), FALSE);
int i = RealizePalette(hDC);
SelectPalette(hDC, hOldPal, TRUE);
RealizePalette(hDC);
ReleaseDC(hwnd, hDC);
LLOG("Realized " << i << " colors");
if(i) InvalidateRect(hwnd, NULL, TRUE);
return i;
}
#endif
case WM_PAINT:
ASSERT(hwnd);
if(hwnd) {
PAINTSTRUCT ps;
if(IsVisible())
SyncScroll();
HDC dc = BeginPaint(hwnd, &ps);
fullrefresh = false;
if(IsVisible()) {
SystemDraw draw(dc);
#ifndef PLATFORM_WINCE
HPALETTE hOldPal;
if(draw.PaletteMode() && SystemDraw::AutoPalette()) {
hOldPal = SelectPalette(dc, GetQlibPalette(), TRUE);
int n = RealizePalette(dc);
LLOG("In paint realized " << n << " colors");
}
#endif
painting = true;
UpdateArea(draw, Rect(ps.rcPaint));
painting = false;
#ifndef PLATFORM_WINCE
if(draw.PaletteMode() && SystemDraw::AutoPalette())
SelectPalette(dc, hOldPal, TRUE);
#endif
}
EndPaint(hwnd, &ps);
}
return 0L;
#ifndef PLATFORM_WINCE
case WM_NCHITTEST:
CheckMouseCtrl();
if(ignoremouse) return HTTRANSPARENT;
break;
#endif
case WM_LBUTTONDOWN:
#ifdef PLARFORM_WINCE
wince_mouseleft = true;
#endif
SetWinceMouse(hwnd, lParam);
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(LEFTDOWN, Point((dword)lParam), 0);
if(_this) PostInput();
return 0L;
case WM_LBUTTONUP:
if(ignoreclick)
EndIgnore();
else
DoMouse(LEFTUP, Point((dword)lParam), 0);
#ifdef PLATFORM_WINCE
wince_mouseleft = false;
#endif
#ifdef PLATFORM_WINCE
wince_mousepos = Point(-99999, -99999);
if(!ignoreclick)
if(_this) DoMouse(MOUSEMOVE, Point(-99999, -99999));
#endif
if(_this) PostInput();
return 0L;
case WM_LBUTTONDBLCLK:
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(LEFTDOUBLE, Point((dword)lParam), 0);
if(_this) PostInput();
return 0L;
case WM_RBUTTONDOWN:
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(RIGHTDOWN, Point((dword)lParam));
if(_this) PostInput();
return 0L;
case WM_RBUTTONUP:
if(ignoreclick)
EndIgnore();
else
DoMouse(RIGHTUP, Point((dword)lParam));
if(_this) PostInput();
return 0L;
case WM_RBUTTONDBLCLK:
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(RIGHTDOUBLE, Point((dword)lParam));
if(_this) PostInput();
return 0L;
case WM_MBUTTONDOWN:
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(MIDDLEDOWN, Point((dword)lParam));
if(_this) PostInput();
return 0L;
case WM_MBUTTONUP:
if(ignoreclick)
EndIgnore();
else
DoMouse(MIDDLEUP, Point((dword)lParam));
if(_this) PostInput();
return 0L;
case WM_MBUTTONDBLCLK:
ClickActivateWnd();
if(ignoreclick) return 0L;
DoMouse(MIDDLEDOUBLE, Point((dword)lParam));
if(_this) PostInput();
return 0L;
#ifndef PLATFORM_WINCE
case WM_NCLBUTTONDOWN:
case WM_NCRBUTTONDOWN:
case WM_NCMBUTTONDOWN:
ClickActivateWnd();
IgnoreMouseUp();
break;
#endif
case WM_MOUSEMOVE:
SetWinceMouse(hwnd, lParam);
LLOG("WM_MOUSEMOVE: ignoreclick = " << ignoreclick);
if(ignoreclick) {
EndIgnore();
return 0L;
}
if(_this)
DoMouse(MOUSEMOVE, Point((dword)lParam));
DoCursorShape();
return 0L;
case 0x20a: // WM_MOUSEWHEEL:
if(ignoreclick) {
EndIgnore();
return 0L;
}
if(_this) {
Point p(0, 0);
::ClientToScreen(hwnd, p);
DoMouse(MOUSEWHEEL, Point((dword)lParam) - p, (short)HIWORD(wParam));
}
if(_this) PostInput();
return 0L;
case WM_SETCURSOR:
if((HWND)wParam == hwnd && LOWORD((dword)lParam) == HTCLIENT) {
if(hCursor) SetCursor(hCursor);
return TRUE;
}
break;
// case WM_MENUCHAR:
// return MAKELONG(0, MNC_SELECT);
case WM_KEYDOWN:
case WM_SYSKEYDOWN:
case WM_CHAR:
ignorekeyup = false;
case WM_KEYUP:
case WM_SYSKEYUP:
{
#if 0
String msgdump;
switch(message)
{
case WM_KEYDOWN: msgdump << "WM_KEYDOWN"; break;
case WM_KEYUP: msgdump << "WM_KEYUP"; break;
case WM_SYSKEYDOWN: msgdump << "WM_SYSKEYDOWN"; break;
case WM_SYSKEYUP: msgdump << "WM_SYSKEYUP"; break;
case WM_CHAR: msgdump << "WM_CHAR"; break;
}
msgdump << " wParam = 0x" << FormatIntHex(wParam, 8)
<< ", lParam = 0x" << FormatIntHex(lParam, 8)
<< ", ignorekeyup = " << (ignorekeyup ? "true" : "false");
LLOG(msgdump);
#endif
dword keycode = 0;
if(message == WM_KEYDOWN) {
keycode = KEYtoK((dword)wParam);
if(keycode == K_SPACE)
keycode = 0;
}
else
if(message == WM_KEYUP)
keycode = KEYtoK((dword)wParam) | K_KEYUP;
else
if(message == WM_SYSKEYDOWN /*&& ((lParam & 0x20000000) || wParam == VK_F10)*/)
keycode = KEYtoK((dword)wParam);
else
if(message == WM_SYSKEYUP /*&& ((lParam & 0x20000000) || wParam == VK_F10)*/)
keycode = KEYtoK((dword)wParam) | K_KEYUP;
else
if(message == WM_CHAR && wParam != 127 && wParam > 32 || wParam == 32 && KEYtoK(VK_SPACE) == K_SPACE) {
#ifdef PLATFORM_WINCE
keycode = wParam;
#else
if(IsWindowUnicode(hwnd)) // TRC 04/10/17: ActiveX Unicode patch
keycode = (dword)wParam;
else {
char b[20];
::GetLocaleInfo(MAKELCID(LOWORD(GetKeyboardLayout(0)), SORT_DEFAULT),
LOCALE_IDEFAULTANSICODEPAGE, b, 20);
int codepage = atoi(b);
if(codepage >= 1250 && codepage <= 1258)
keycode = ToUnicode((dword)wParam, codepage - 1250 + CHARSET_WIN1250);
else
keycode = (dword)wParam;
}
#endif
}
bool b = false;
if(keycode) {
b = DispatchKey(keycode, LOWORD(lParam));
SyncCaret();
if(_this) PostInput();
}
// LOG("key processed = " << b);
if(b || (message == WM_SYSKEYDOWN || message == WM_SYSKEYUP)
&& wParam != VK_F4 && !PassWindowsKey((dword)wParam)) // 17.11.2003 Mirek -> invoke system menu
return 0L;
break;
}
break;
// case WM_GETDLGCODE:
// return wantfocus ? 0 : DLGC_STATIC;
case WM_ERASEBKGND:
return 1L;
case WM_DESTROY:
PreDestroy();
#ifndef PLATFORM_WINCE
break;
case WM_NCDESTROY:
#endif
if(!hwnd) break;
if(HasChildDeep(mouseCtrl) || this == ~mouseCtrl) mouseCtrl = NULL;
if(HasChildDeep(focusCtrl) || this == ~focusCtrl) focusCtrl = NULL;
if(HasChildDeep(focusCtrlWnd) || this == ~focusCtrlWnd) {
LLOG("WM_NCDESTROY: clearing focusCtrlWnd = " << UPP::Name(focusCtrlWnd));
focusCtrlWnd = NULL;
focusCtrl = NULL;
}
if(::GetFocus() == NULL) {
Ctrl *owner = GetOwner();
if(owner && (owner->IsForeground() || IsForeground()) && !owner->SetWantFocus())
IterateFocusForward(owner, owner);
}
#ifdef PLATFORM_WINCE
DefWindowProc(hwnd, message, wParam, lParam);
#else
if(IsWindowUnicode(hwnd)) // TRC 04/10/17: ActiveX unicode patch
DefWindowProcW(hwnd, message, wParam, lParam);
else
DefWindowProc(hwnd, message, wParam, lParam);
#endif
hwnd = NULL;
return 0L;
case WM_CANCELMODE:
if(this == ~captureCtrl || HasChildDeep(captureCtrl))
ReleaseCtrlCapture();
break;
case WM_SHOWWINDOW:
visible = (BOOL) wParam;
StateH(SHOW);
break;
#ifndef PLATFORM_WINCE
case WM_MOUSEACTIVATE:
LLOG("WM_MOUSEACTIVATE " << Name() << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
if(!IsEnabled()) {
if(lastActiveWnd && lastActiveWnd->IsEnabled()) {
LLOG("WM_MOUSEACTIVATE -> ::SetFocus for " << UPP::Name(lastActiveWnd));
::SetFocus(lastActiveWnd->GetHWND());
}
else
MessageBeep(MB_OK);
return MA_NOACTIVATEANDEAT;
}
if(IsPopUp()) return MA_NOACTIVATE;
break;
#endif
case WM_SIZE:
case WM_MOVE:
if(hwnd) {
Rect rect;
#ifndef PLATFORM_WINCE
if(activex) {
WINDOWPLACEMENT wp;
wp.length = sizeof(WINDOWINFO);
::GetWindowPlacement(hwnd, &wp);
rect = wp.rcNormalPosition;
}
else
#endif
rect = GetScreenClient(hwnd);
LLOG("WM_MOVE / WM_SIZE: screen client = " << rect);
if(GetRect() != rect)
SetWndRect(rect);
#if WINCARET
WndDestroyCaret();
caretCtrl = NULL;
SyncCaret();
#endif
}
return 0L;
case WM_HELP:
return TRUE;
case WM_ACTIVATE:
LLOG("WM_ACTIVATE " << Name() << ", wParam = " << (int)wParam << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
ignorekeyup = true;
break;
case WM_SETFOCUS:
LLOG("WM_SETFOCUS " << Name() << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
if(this != focusCtrlWnd)
if(IsEnabled()) {
LLOG("WM_SETFOCUS -> ActivateWnd: this != focusCtrlWnd, this = "
<< Name() << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd));
ActivateWnd();
}
else {
if(focusCtrlWnd && focusCtrlWnd->IsEnabled()) {
if(!IsEnabled())
MessageBeep(MB_OK);
LLOG("WM_SETFOCUS -> ::SetFocus for " << UPP::Name(focusCtrlWnd));
::SetFocus(focusCtrlWnd->GetHWND());
}
else
if(lastActiveWnd && lastActiveWnd->IsEnabled()) {
LLOG("WM_SETFOCUS -> ::SetFocus for " << UPP::Name(lastActiveWnd));
::SetFocus(lastActiveWnd->GetHWND());
}
else {
LLOG("WM_SETFOCUS - ::SetFocus(NULL)");
::SetFocus(NULL);
}
}
LLOG("//WM_SETFOCUS " << (void *)hwnd << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
return 0L;
case WM_KILLFOCUS:
LLOG("WM_KILLFOCUS " << (void *)(HWND)wParam << ", this = " << UPP::Name(this) << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
LLOG("Kill " << UPP::Name(CtrlFromHWND((HWND)wParam)));
if(!CtrlFromHWND((HWND)wParam)) {
LLOG("WM_KILLFOCUS -> KillFocusWnd: " << UPP::Name(this));
KillFocusWnd();
}
LLOG("//WM_KILLFOCUS " << (void *)(HWND)wParam << ", focusCtrlWnd = " << UPP::Name(focusCtrlWnd) << ", raw = " << (void *)::GetFocus());
return 0L;
case WM_ENABLE:
if(!!wParam != enabled) {
enabled = !!wParam;
RefreshFrame();
StateH(ENABLE);
}
return 0L;
#ifndef PLATFORM_WINCE
case WM_GETMINMAXINFO:
{
MINMAXINFO *mmi = (MINMAXINFO *)lParam;
Rect frmrc = Size(200, 200);
::AdjustWindowRect(frmrc, WS_OVERLAPPEDWINDOW, FALSE);
// Size msz = Ctrl::GetWorkArea().Deflated(-frmrc.left, -frmrc.top,
// frmrc.right - 200, frmrc.bottom - 200).GetSize();
// Rect minr(Point(50, 50), min(msz, GetMinSize()));
// Rect maxr(Point(50, 50), min(msz, GetMaxSize())); // Removed cxl&nixnixnix 2012-6-12
Rect minr(Point(50, 50), GetMinSize());
Rect maxr(Point(50, 50), GetMaxSize());
dword style = ::GetWindowLong(hwnd, GWL_STYLE);
dword exstyle = ::GetWindowLong(hwnd, GWL_EXSTYLE);
AdjustWindowRectEx(minr, style, FALSE, exstyle);
AdjustWindowRectEx(maxr, style, FALSE, exstyle);
mmi->ptMinTrackSize = Point(minr.Size());
mmi->ptMaxTrackSize = Point(maxr.Size());
LLOG("WM_GETMINMAXINFO: MinTrackSize = " << Point(mmi->ptMinTrackSize) << ", MaxTrackSize = " << Point(mmi->ptMaxTrackSize));
LLOG("ptMaxSize = " << Point(mmi->ptMaxSize) << ", ptMaxPosition = " << Point(mmi->ptMaxPosition));
}
return 0L;
#endif
/* case WM_SETTINGCHANGE:
case 0x031A: // WM_THEMECHANGED
ReSkin();
RefreshLayoutDeep();
RefreshFrame();
break;
*/
/*
case WM_IME_COMPOSITION:
HIMC himc = ImmGetContext(hwnd);
if(!himc) break;
CANDIDATEFORM cf;
Rect r = GetScreenRect();
cf.dwIndex = 0;
cf.dwStyle = CFS_CANDIDATEPOS;
cf.ptCurrentPos.x = r.left + caretx;
cf.ptCurrentPos.y = r.top + carety + caretcy;
ImmSetCandidateWindow (himc, &cf);
break;
*/
}
if(hwnd)
#ifdef PLATFORM_WINCE
return DefWindowProc(hwnd, message, wParam, lParam);
#else
if(IsWindowUnicode(hwnd)) // TRC 04/10/17: ActiveX unicode patch
return DefWindowProcW(hwnd, message, wParam, lParam);
else
return DefWindowProc(hwnd, message, wParam, lParam);
#endif
return 0L;
}
void Ctrl::PreDestroy() {}
END_UPP_NAMESPACE
#endif