Visual Basic - Como bloquear copy/paste

Life is soft - evento anual de software empresarial
 
Vista:

Como bloquear copy/paste

Publicado por Mauricio Rodriguez (2 intervenciones) el 03/06/2003 23:01:03
Hola,.
Necesito ayuda con algo. En mi aplicacion necesito impedir que el usuario haga copy/paste tanto con el teclado como conel muse. La parte del teclado y aesta, pero no se como hacer lo del mouse que sea general para la forma y no por cada text box.

Muchas gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como bloquear copy/paste

Publicado por Cecilia Colalongo (3116 intervenciones) el 03/06/2003 23:11:06
Podes hacer un control OCX con el textbox implementando todas las propiedades y métodos y capturando los mensajes de Copy y Paste, fijate con esto:

Public Const WM_CUT = &H300
Public Const WM_COPY = &H301
Public Const WM_PASTE = &H302
Public Const WM_CLEAR = &H303
Public Const GWL_WNDPROC = -4
Public Const WM_RBUTTONUP = &H205

Public Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Public lpPrevWndProc As Long
Private lngHWnd As Long

Public Sub Hook(hWnd As Long)
lngHWnd = hWnd
lpPrevWndProc = SetWindowLong(lngHWnd, GWL_WNDPROC, AddressOf WindowProc)
End Sub

Public Sub UnHook()
Dim lngReturnValue As Long
lngReturnValue = SetWindowLong(lngHWnd, GWL_WNDPROC, lpPrevWndProc)
End Sub

Public Function WindowProc(ByVal hw As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Select Case uMsg
Case WM_CUT
Case WM_COPY
Case WM_PASTE
Case WM_CLEAR
Case WM_RBUTTONUP
Case Else
WindowProc = CallWindowProc(lpPrevWndProc, hw, uMsg, wParam, lParam)
End Select
End Function
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como bloquear copy/paste

Publicado por Mauricio Rodriguez (2 intervenciones) el 03/06/2003 23:52:38
Cecilia muchas gracias.
Sin embargo lo que yo quisiera hacer es algo parecido a la validacion del teclado, la cual se lleva a cabo en el evento KeyPress y se puede aplcar a una forma. Es posible hacer una validacion en el evento Clik o algo asi?

Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como bloquear copy/paste

Publicado por Cecilia Colalongo (3116 intervenciones) el 04/06/2003 01:53:00
De ese caso particular no creo que se pueda porque se envía un mensaje (el que capturo en el código con SendMessage) antes que se dispare el evento Click.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar