Delphi: Draw a text in a caption form for vista with aero like windows 7

aerodelphinonclient

How does one draw text (with onClick event) in a caption bar on vista with aero Like Windows 7 ?

alt text http://img529.imageshack.us/img529/3643/immaginembl.jpg

The example at delphi.about.com doesn't work on Vista with aero. Do you have any ideas?

Thanks to all.

Sorry for my bad english.

Best Solution

Drawing in the nonclient region causes glass to be disabled automatically. What MS Office does is expand the client region to cover the borders. Look at the "Drawing in the NC area with glass" section of this WPF article for suggestions. You'll have to convert the API calls to Delphi yourself, I'm afraid.

Related Solutions

R – Translating Vista WinAPI C++ header for Delphi – any suggestions

The Win32 BOOLEAN type is one byte, but Delphi's LongBool type is four. Use Delphi's ByteBool instead.

Handling WM_NCPAINT “breaks” DWM glass rendering on Vista/Aero

When toggling between Aero/Glass and your custom rendered frame it you can use the following to explicitly control the non-client area rendering policy:

DWMNCRENDERINGPOLICY policy = DWMNCRP_ENABLED; // DWMNCRP_DISABLED to toggle back
DwmSetWindowAttribute(hwnd, 
                      DWMWA_NCRENDERING_POLICY, 
                      (void*)&policy, 
                      sizeof(DWMNCRENDERINGPOLICY));

Best Solution

Related Solutions

R – Translating Vista WinAPI C++ header for Delphi – any suggestions

Handling WM_NCPAINT “breaks” DWM glass rendering on Vista/Aero

Related Question