FiveTech Software tech support forums

Hi All ! As subject : Private Declare Function OpenThemeData Lib "uxtheme.dll" (ByVal hWnd As Long, ByVal pszClassList As Long) As Long I have vb source code for tExplorerBar http://planet-source-code.com/vb/scripts/ShowZip.asp?lngWId=1&lngCodeId=61899&strZipAccessCode=tp%2FX618999818 ...

Alex,

hTheme = OpenThemeData(hWnd, L"COMBOBOX");

Code: Select all  Expand view

   LPWSTR AnsiToWide( char * );

   ...

   LPWSTR pW = AnsiToWide( hb_parc( 3 ) );

   hTheme = OpenThemeData( hWnd, pW );
   hb_xfree( pW );
   ...


How could I change: hTheme = OpenThemeData(hWnd, L"COMBOBOX"); to hTheme = OpenThemeData(hWnd, L_parc(3); Compiler does not like it... The following compiles, but I don't get anything drawn: char *cStyle = ...