update for HEAD-2003091401
[reactos.git] / lib / user32 / controls / icontitle.c
diff --git a/lib/user32/controls/icontitle.c b/lib/user32/controls/icontitle.c
new file mode 100644 (file)
index 0000000..497fed5
--- /dev/null
@@ -0,0 +1,236 @@
+/*
+ * Icontitle window class.
+ *
+ * Copyright 1997 Alex Korobka
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ */
+
+/*
+ * COPYRIGHT:        See COPYING in the top level directory
+ * PROJECT:          ReactOS User32
+ * PURPOSE:          Static control
+ * FILE:             lib/user32/controls/icontitle.c
+ * PROGRAMER:        Steven Edwards
+ * REVISION HISTORY: 2003/06/21 SAE Created
+ * NOTES:            Adapted from Wine
+ */
+
+#include "windows.h"
+#include "user32/regcontrol.h"
+#include "controls.h"
+
+static BOOL bMultiLineTitle;
+static HFONT hIconTitleFont;
+
+static LRESULT CALLBACK IconTitleWndProc( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam );
+
+/*********************************************************************
+ * icon title class descriptor
+ */
+const struct builtin_class_descr ICONTITLE_builtin_class =
+{
+    L"ICONTITLE_CLASS_ATOM",     /* name */
+    CS_GLOBALCLASS,             /* style */
+    (WNDPROC) IconTitleWndProc, /* procW */
+    0,                          /* extra */
+    (LPCWSTR) IDC_ARROW,         /* cursor */ /* FIXME Wine uses IDC_ARROWA */
+    0                           /* brush */
+};
+
+
+
+/***********************************************************************
+ *           ICONTITLE_Create
+ */
+HWND ICONTITLE_Create( HWND owner )
+{
+    HWND hWnd;
+    HINSTANCE instance = (HINSTANCE)GetWindowLongA( owner, GWL_HINSTANCE );
+    LONG style = WS_CLIPSIBLINGS;
+
+    if (!IsWindowEnabled(owner)) style |= WS_DISABLED;
+    if( GetWindowLongA( owner, GWL_STYLE ) & WS_CHILD )
+       hWnd = CreateWindowExA( 0, ICONTITLE_CLASS_ATOM, NULL,
+                                style | WS_CHILD, 0, 0, 1, 1,
+                                GetParent(owner), 0, instance, NULL );
+    else
+       hWnd = CreateWindowExA( 0, ICONTITLE_CLASS_ATOM, NULL,
+                                style, 0, 0, 1, 1,
+                                owner, 0, instance, NULL );
+    //WIN_SetOwner( hWnd, owner );  /* MDI depends on this */
+    SetWindowLongW( hWnd, GWL_STYLE,
+                    GetWindowLongW( hWnd, GWL_STYLE ) & ~(WS_CAPTION | WS_BORDER) );
+    return hWnd;
+}
+
+/***********************************************************************
+ *           ICONTITLE_SetTitlePos
+ */
+static BOOL ICONTITLE_SetTitlePos( HWND hwnd, HWND owner )
+{
+    static WCHAR emptyTitleText[] = {'<','.','.','.','>',0};
+    WCHAR str[80];
+    HDC hDC;
+    HFONT hPrevFont;
+    RECT rect;
+    INT cx, cy;
+    POINT pt;
+
+    int length = GetWindowTextW( owner, str, sizeof(str)/sizeof(WCHAR) );
+
+    while (length && str[length - 1] == ' ') /* remove trailing spaces */
+        str[--length] = 0;
+
+    if( !length )
+    {
+        lstrcpyW( str, emptyTitleText );
+        length = lstrlenW( str );
+    }
+
+    if (!(hDC = GetDC( hwnd ))) return FALSE;
+
+    hPrevFont = SelectObject( hDC, hIconTitleFont );
+
+    SetRect( &rect, 0, 0, GetSystemMetrics(SM_CXICONSPACING) -
+             GetSystemMetrics(SM_CXBORDER) * 2,
+             GetSystemMetrics(SM_CYBORDER) * 2 );
+
+    DrawTextW( hDC, str, length, &rect, DT_CALCRECT | DT_CENTER | DT_NOPREFIX | DT_WORDBREAK |
+               (( bMultiLineTitle ) ? 0 : DT_SINGLELINE) );
+
+    SelectObject( hDC, hPrevFont );
+    ReleaseDC( hwnd, hDC );
+
+    cx = rect.right - rect.left +  4 * GetSystemMetrics(SM_CXBORDER);
+    cy = rect.bottom - rect.top;
+
+    pt.x = (GetSystemMetrics(SM_CXICON) - cx) / 2;
+    pt.y = GetSystemMetrics(SM_CYICON);
+
+    /* point is relative to owner, make it relative to parent */
+    MapWindowPoints( owner, GetParent(hwnd), &pt, 1 );
+
+    SetWindowPos( hwnd, owner, pt.x, pt.y, cx, cy, SWP_NOACTIVATE );
+    return TRUE;
+}
+
+/***********************************************************************
+ *           ICONTITLE_Paint
+ */
+static BOOL ICONTITLE_Paint( HWND hwnd, HWND owner, HDC hDC, BOOL bActive )
+{
+    RECT rect;
+    HFONT hPrevFont;
+    HBRUSH hBrush = 0;
+    COLORREF textColor = 0;
+
+    if( bActive )
+    {
+       hBrush = GetSysColorBrush(COLOR_ACTIVECAPTION);
+       textColor = GetSysColor(COLOR_CAPTIONTEXT);
+    }
+    else
+    {
+        if( GetWindowLongA( hwnd, GWL_STYLE ) & WS_CHILD )
+       {
+           hBrush = (HBRUSH) GetClassLongA(hwnd, GCL_HBRBACKGROUND);
+           if( hBrush )
+           {
+               INT level;
+               LOGBRUSH logBrush;
+               GetObjectA( hBrush, sizeof(logBrush), &logBrush );
+               level = GetRValue(logBrush.lbColor) +
+                          GetGValue(logBrush.lbColor) +
+                             GetBValue(logBrush.lbColor);
+               if( level < (0x7F * 3) )
+                   textColor = RGB( 0xFF, 0xFF, 0xFF );
+           }
+           else
+               hBrush = GetStockObject( WHITE_BRUSH );
+       }
+       else
+       {
+           hBrush = GetStockObject( BLACK_BRUSH );
+           textColor = RGB( 0xFF, 0xFF, 0xFF );
+       }
+    }
+
+    GetClientRect( hwnd, &rect );
+    DPtoLP( hDC, (LPPOINT)&rect, 2 );
+    FillRect( hDC, &rect, hBrush );
+
+    hPrevFont = SelectObject( hDC, hIconTitleFont );
+    if( hPrevFont )
+    {
+       WCHAR buffer[80];
+
+        INT length = GetWindowTextW( owner, buffer, sizeof(buffer) );
+        SetTextColor( hDC, textColor );
+        SetBkMode( hDC, TRANSPARENT );
+
+        DrawTextW( hDC, buffer, length, &rect, DT_CENTER | DT_NOPREFIX |
+                   DT_WORDBREAK | ((bMultiLineTitle) ? 0 : DT_SINGLELINE) );
+
+       SelectObject( hDC, hPrevFont );
+    }
+    return (hPrevFont != 0);
+}
+
+/***********************************************************************
+ *           IconTitleWndProc
+ */
+LRESULT WINAPI IconTitleWndProc( HWND hWnd, UINT msg,
+                                 WPARAM wParam, LPARAM lParam )
+{
+    HWND owner = GetWindow( hWnd, GW_OWNER );
+
+    if (!IsWindow(hWnd)) return 0;
+
+    switch( msg )
+    {
+        case WM_CREATE:
+            if (!hIconTitleFont)
+            {
+                LOGFONTA logFont;
+                SystemParametersInfoA( SPI_GETICONTITLELOGFONT, 0, &logFont, 0 );
+                SystemParametersInfoA( SPI_GETICONTITLEWRAP, 0, &bMultiLineTitle, 0 );
+                hIconTitleFont = CreateFontIndirectA( &logFont );
+            }
+            return (hIconTitleFont ? 0 : -1);
+       case WM_NCHITTEST:
+            return HTCAPTION;
+       case WM_NCMOUSEMOVE:
+       case WM_NCLBUTTONDBLCLK:
+            return SendMessageW( owner, msg, wParam, lParam );
+       case WM_ACTIVATE:
+            if( wParam ) SetActiveWindow( owner );
+             return 0;
+       case WM_CLOSE:
+            return 0;
+       case WM_SHOWWINDOW:
+            if (wParam) ICONTITLE_SetTitlePos( hWnd, owner );
+            return 0;
+       case WM_ERASEBKGND:
+            if( GetWindowLongA( owner, GWL_STYLE ) & WS_CHILD )
+                lParam = SendMessageA( owner, WM_ISACTIVEICON, 0, 0 );
+            else
+                lParam = (owner == GetActiveWindow());
+            if( ICONTITLE_Paint( hWnd, owner, (HDC)wParam, (BOOL)lParam ) )
+                ValidateRect( hWnd, NULL );
+            return 1;
+    }
+    return DefWindowProcW( hWnd, msg, wParam, lParam );
+}