From d3bb5f031766cd10f6bf24db3443494ad6830684 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Tue, 20 Jun 2006 09:32:41 +0000 Subject: [PATCH] 2006-06-20 11:33 UTC+0100 Viktor Szakats (viktor.szakats syenar.hu) * harbour/source/rtl/gtwin/gtwin.c ! Stupid bug fixed in prev commit. --- harbour/ChangeLog | 4 ++++ harbour/source/rtl/gtwin/gtwin.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 3af520f9c5..3093b7fc73 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2002-12-01 13:30 UTC+0100 Foo Bar */ + * harbour/include/hbapicls.h + * harbour/source/vm/classes.c + + added hb_objHasMesage( PHB_ITEM pObject, PHB_DYNS pMessage ) + + added hb_objGetpMethod() for backward binary compatibility with FWH * hidden for 3-rd party users hb_objGetMethod() and hb_objPopSuperCast() If for some reason 3-rd party code will need these methods please tell me in which case and I'll add necessary functions. Please diff --git a/harbour/source/rtl/gtwin/gtwin.c b/harbour/source/rtl/gtwin/gtwin.c index 1cefb15f4d..d67d04dca8 100644 --- a/harbour/source/rtl/gtwin/gtwin.c +++ b/harbour/source/rtl/gtwin/gtwin.c @@ -1757,7 +1757,7 @@ static void hb_gt_win_SetClipboard( char * szClipData, ULONG ulLen ) { LPTSTR lptstrCopy; HGLOBAL hglbCopy; - UINT uFormat = OEM_CHARSET; + UINT uFormat = CF_OEMTEXT; if ( OpenClipboard( NULL ) ) { @@ -1783,7 +1783,7 @@ static BOOL hb_gt_win_GetClipboard( char ** pszClipData, ULONG *pulLen ) { HGLOBAL hglb; LPTSTR lptstr; - UINT uFormat = OEM_CHARSET; + UINT uFormat = CF_OEMTEXT; *pulLen = 0; *pszClipData = NULL;