Einzelnen Beitrag anzeigen

xaromz

Registriert seit: 18. Mär 2005
1.682 Beiträge
 
Delphi 2006 Enterprise
 
#21

Re: MouseEnter/MouseLeave ohne VCL!

  Alt 5. Jan 2007, 23:56
Hallo,

die Message WM_CTLCOLORSTATIC erwartet als Rückgabewert einen HBrush. Den musst Du also auch zurückgeben:
Delphi-Quellcode:
        if lParam = GetDlgItem(hWnd, ID_STC_WEB) then
        begin
          SetTextColor(wParam, RGB(0, 0, 255));
          // Text-Hintergrund setzen
          SetBkColor(wParam, GetSysColor(COLOR_BTNFACE));
          // Brush zurückliefern
          Brush := GetSysColorBrush(COLOR_BTNFACE);
          Result := Brush;
          SetProp(hWnd, 'Brush', Brush);
        end
Gruß
xaromz
I am a leaf on the wind - watch how I soar
  Mit Zitat antworten Zitat