Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: -Marta- en 8 Septiembre 2005, 02:31 am



Título: Deshabilitar teclas en VB
Publicado por: -Marta- en 8 Septiembre 2005, 02:31 am
Hola gente

es posible que mi pregunta os parezca "tonta", pero no se como hacerlo y me estoy volviendo loca, necesito desactivar la tecla Impr Pant para que no se puedan hacer copias de pantalla, ya tengo hecha una funcion para que me detecte esa tecla pero no se como desactivarla

porfa, alguien me puede dar una pista de como hacerlo?

un saludo

-Marta-


Título: Re: Deshabilitar teclas en VB
Publicado por: Slasher-K en 8 Septiembre 2005, 02:49 am
Si lo que querés hacer es que no se pueda usar el portapapeles del sistema para copiar una imagen, lo que podés hacer es poner un control Timer en el formulario con su propiedad Interval establecida a un valor muy bajo (como puede ser 50 o 100) y en el evento Timer borrar los datos del portapapeles, en el caso que fueran imágenes.

Código:
Private Sub Timer1_Timer()
  If Clipboard.GetFormat(vbCFBitmap) Or Clipboard.GetFormat(vbCFDib) Then
    Call Clipboard.Clear
  End If
End Sub

Este es el camino más corto pero también podrías detectar la pulsación de la tecla Impr Pant con la función GetAsyncKeyState y en el caso que esté presionada borrar los datos del portapapeles.

Desactivar el hardware es mucho más dificil y no se puede hacer directamente desde VB.

Saludos.


Título: Re: Deshabilitar teclas en VB
Publicado por: -Marta- en 9 Septiembre 2005, 00:59 am
Gracias anhur

has sido muy amable

me permito abusar un poco mas de tus conocimientos, sabes alguna forma de implementar esa misma funcion en el visual que utiliza access o en visual script?

reitero mis gracias y recibe un saludo

-Marta-