static HB_BOOL hb_gt_gui_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo ) { HB_TRACE( HB_TR_DEBUG, ( "hb_gt_gui_Info(%p,%d,%p)", pGT, iType, pInfo ) ); switch( iType ) { #if defined( HB_OS_WIN ) case HB_GTI_CLIPBOARDDATA: if( hb_itemType( pInfo->pNewVal ) & HB_IT_STRING ) #if defined( UNICODE ) hb_gt_winapi_setClipboard( CF_UNICODETEXT, pInfo->pNewVal ); #else hb_gt_winapi_setClipboard( CF_TEXT, pInfo->pNewVal ); #endif else { if( pInfo->pResult == NULL ) pInfo->pResult = hb_itemNew( NULL ); #if defined( UNICODE ) hb_gt_winapi_getClipboard( CF_UNICODETEXT, pInfo->pResult ); #else hb_gt_winapi_getClipboard( CF_TEXT, pInfo->pResult ); #endif } break; case HB_GTI_KBDSHIFTS: pInfo->pResult = hb_itemPutNI( pInfo->pResult, hb_gt_winapi_getKbdState() ); if( hb_itemType( pInfo->pNewVal ) & HB_IT_NUMERIC ) hb_gt_winapi_setKbdState( hb_itemGetNI( pInfo->pNewVal ) ); break; #endif default: return HB_GTSUPER_INFO( pGT, iType, pInfo ); }
static BOOL hb_gt_std_Info( PHB_GT pGT, int iType, PHB_GT_INFO pInfo ) { HB_TRACE( HB_TR_DEBUG, ( "hb_gt_std_Info(%p,%d,%p)", pGT, iType, pInfo ) ); switch ( iType ) { case HB_GTI_FULLSCREEN: case HB_GTI_KBDSUPPORT: pInfo->pResult = hb_itemPutL( pInfo->pResult, TRUE ); break; default: return HB_GTSUPER_INFO( pGT, iType, pInfo ); } return TRUE; }