DESHABILITAR TECLA PRINT SCREEN

[karinha]

Buenos dias Maestros,

És posible hacer esto en FIVEWIN?

http://support.microsoft.com/kb/35968/pt-br

Maestro Manuel Mercado, Help-me... jejejeje.

Necesito deshabilitar la tecla PRINT SCREEN, para que los usuários no puedan copiar las informaciones de mi programa.

Gracias,

Saludos.

[Antonio Linares]

João,

http://www.todoexpertos.com/categorias/tecnologia-e-internet/programacion/respuestas/340217/deshabilitar-print-screen

http://www.codeproject.com/KB/DLL/keyboardhook.aspx

[karinha]

Gracias, amado maestro.

Saludos.

[mmercado]

Hola João:

Maestro Manuel Mercado, Help-me... jejejeje.

Prueba el siguiente ejemplo... jejejeje

Code: Select all  Expand view

#include "FiveWin.ch"

//--------------------------------------------------------------------------------------------------------------------//

Function Main()

   Local oDlg, oBmp

   Define Dialog oDlg From 0, 0 To 500, 600 Title 'Stop Screen printing' Pixel

   @  0,  0 BitMap oBmp FileName "\fwh\bitmaps\cliplogo.bmp" NoBorder

   Activate Dialog oDlg Centered On Init NoPrScrKey()

Return Nil

#pragma BEGINDUMP
#include <Windows.h>
#include <winten.h>
#include <ClipApi.h>

static far HHOOK hKbrd ;
extern HINSTANCE GetInstance( void ) ;
BOOL InstallHook( void ) ;

//--------------------------------------------------------------------------------------------------------------------//

HB_FUNC( NOPRSCRKEY )
{
   InstallHook() ;
}

//--------------------------------------------------------------------------------------------------------------------//

LRESULT CALLBACK KeyboardProc( int nCode, WPARAM wParam, LPARAM lParam )
{

   if( hKbrd && ( ( DWORD ) lParam & 0x40000000 ) && ( HC_ACTION == nCode ) && ( wParam == VK_SNAPSHOT ) )
   {
      OpenClipboard( NULL ) ;
      EmptyClipboard() ;
      CloseClipboard() ;
      PostQuitMessage( 0 ) ;
   }

   return CallNextHookEx( hKbrd, nCode, wParam, lParam ) ;
}

//--------------------------------------------------------------------------------------------------------------------//

BOOL InstallHook()
{
   hKbrd = SetWindowsHookEx( WH_KEYBOARD, ( HOOKPROC ) KeyboardProc, GetInstance(), 0 ) ;

   if( hKbrd )
      return TRUE ;
   else
      return FALSE ;
}

#pragma ENDDUMP

Un abrazo.

[karinha]

Hola João:

Maestro Manuel Mercado, Help-me... jejejeje.

Prueba el siguiente ejemplo... jejejeje

Code: Select all  Expand view

#include "FiveWin.ch"

//--------------------------------------------------------------------------------------------------------------------//

Function Main()

   Local oDlg, oBmp

   Define Dialog oDlg From 0, 0 To 500, 600 Title 'Stop Screen printing' Pixel

   @  0,  0 BitMap oBmp FileName "\fwh\bitmaps\cliplogo.bmp" NoBorder

   Activate Dialog oDlg Centered On Init NoPrScrKey()

Return Nil

#pragma BEGINDUMP
#include <Windows.h>
#include <winten.h>
#include <ClipApi.h>

static far HHOOK hKbrd ;
extern HINSTANCE GetInstance( void ) ;
BOOL InstallHook( void ) ;

//--------------------------------------------------------------------------------------------------------------------//

HB_FUNC( NOPRSCRKEY )
{
   InstallHook() ;
}

//--------------------------------------------------------------------------------------------------------------------//

LRESULT CALLBACK KeyboardProc( int nCode, WPARAM wParam, LPARAM lParam )
{

   if( hKbrd && ( ( DWORD ) lParam & 0x40000000 ) && ( HC_ACTION == nCode ) && ( wParam == VK_SNAPSHOT ) )
   {
      OpenClipboard( NULL ) ;
      EmptyClipboard() ;
      CloseClipboard() ;
      PostQuitMessage( 0 ) ;
   }

   return CallNextHookEx( hKbrd, nCode, wParam, lParam ) ;
}

//--------------------------------------------------------------------------------------------------------------------//

BOOL InstallHook()
{
   hKbrd = SetWindowsHookEx( WH_KEYBOARD, ( HOOKPROC ) KeyboardProc, GetInstance(), 0 ) ;

   if( hKbrd )
      return TRUE ;
   else
      return FALSE ;
}

#pragma ENDDUMP

Un abrazo.

Gracias querido maestro.

Voy probrar.

Saludos