fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2008-06-17 21:45 UTC+0200 Viktor Szakats (harbour.01 syenar hu)

Browse Source 
* source/rtl/gtclip.c
     ! Added three LPWSTR casts to pacify warnings.
       [TOMERGE RC1]
This commit is contained in:
Viktor Szakats
2008-06-17 19:48:39 +00:00
parent 1d0e0dee30
commit d41eb7ffb2
2 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-06-17 21:45 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/rtl/gtclip.c
! Added three LPWSTR casts to pacify warnings.
[TOMERGE RC1]
2008-06-17 18:49 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/rtl/gtclip.c
! Fixed get/set clipboard when UNICODE is #defined.

6
harbour/source/rtl/gtclip.c
View File

@@ -109,7 +109,7 @@ BOOL hb_gt_w32_setClipboard( UINT uFormat, char * szClipData, ULONG ulLen )
{
if( uFormat == CF_UNICODETEXT )
{
hb_mbtowcset( lptstrCopy, szClipData, ulLen );
hb_mbtowcset( ( LPWSTR ) lptstrCopy, szClipData, ulLen );
lptstrCopy[ ulLen * sizeof( wchar_t ) ] = L'\0';
}
else
@@ -143,9 +143,9 @@ BOOL hb_gt_w32_getClipboard( UINT uFormat, char ** pszClipData, ULONG *pulLen )
switch( uFormat )
{
case CF_UNICODETEXT:
*pulLen = wcslen( lptstr );
*pulLen = wcslen( ( LPWSTR ) lptstr );
if( *pulLen )
*pszClipData = hb_wctomb( lptstr );
*pszClipData = hb_wctomb( ( LPWSTR ) lptstr );
break;
case CF_OEMTEXT:
case CF_TEXT: