🚀 go-pugleaf

Hi,

Using the small piece of code below I create a combobox capable of 
displaying Unicode. Everything works just great except for a few details 
of the visual appearance of the box. Compared to a regular XP/Vista 
themed TComboBox I can see following differences:

+ XP/Vista: When opening the drop down list and moving over the 
available items no blue selection bar (which is as wide as the combobox) 
will follow the mouse cursor when moving over the items in the drop down 
list.
+ Vista: A combobox with its drop down list not active will show 
incorrect background colour.

TXPManifest is present on the form and does indeed takes care of most of 
the theming for the unicode combo, but a few details are missing when 
compared to a regular VCL TCombobox.

Any suggestions are much appreciated,

Kris

HWND hwndCB;
INITCOMMONCONTROLSEX icex;

icex.dwSize = sizeof(INITCOMMONCONTROLSEX);
icex.dwICC = ICC_USEREX_CLASSES;

InitCommonControlsEx(&icex);

hwndCB=CreateWindowW(
			WC_COMBOBOXEXW,
			NULL,
			WS_BORDER | WS_VISIBLE |
			WS_CHILD | CBS_DROPDOWNLIST,
			80,
			80,
			0,
			100,
			Handle,
			NULL,
			Form1,
			NULL
		);
		
COMBOBOXEXITEMW ComboItemW;
memset(&ComboItemW,0,sizeof(ComboItemW));

ComboItemW.pszText=MyWideString;
ComboItemW.mask = CBEIF_TEXT;
ComboItemW.iItem=0;

SendMessage(hwndCB,CBEM_INSERTITEMW,-1,(LPARAM)&ComboItemW);
SendMessage(hwndCB,CBEM_INSERTITEMW,-1,(LPARAM)&ComboItemW);

SetWindowPos(hwndCB,NULL,80,80,250,120,SWP_NOACTIVATE);