Jaba
|
SÃO PEDRO DA ALDEIA RJ - BRASIL
|
|
Postada em 26/11/2005 16:24 hs
OLA AMIGOS, POR ACASO ALGUÉM SABE COMO FAZER PARA QUE O FORMULARIO FIQUE TRANSPARENTE,. NO JOGO DE COUNTER STRIKE, QUANDO APERTAMOS A TECLA "TAB" APARECE UM DO JEITO QUE EU ESTOU QUERENDO. ALGUÉM PODERIA ME AJUDAR NESSA? ATENCIOSAMENTE, RODRIGO PORTO
|
|
|
|
|
Postada em 26/11/2005 18:30 hs
naum conheço o jogo mencionado, mas vê se isso serve... 'Declaração de APIs 'Em um módulo Public Const GWL_EXSTYLE = (-20) Public Const WS_EX_TRANSPARENT = &H20& Public Const SWP_FRAMECHANGED = &H20 Public Const SWP_NOMOVE = &H2 Public Const SWP_NOSIZE = &H1 Public Const SWP_SHOWME = SWP_FRAMECHANGED Or _ SWP_NOMOVE Or SWP_NOSIZE Public Const HWND_NOTOPMOST = -2
Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
'Código SetWindowLong Me.hwnd, GWL_EXSTYLE, WS_EX_TRANSPARENT SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, SWP_SHOWME
|
|
|
|
Postada em 27/11/2005 12:04 hs
cara..... isso que voce quer nao eh invisivel... eh soh tramparente.... q nen olhar um vidro... vc ve o Vidro e o que tem atras!
|
|
|
|
Postada em 28/11/2005 22:37 hs
Jaba, tem uma ocx que faz isso, ela deixa a janela transparente, estou colocando ela na area de troca de arquivos ! Pegue os arquivos Transparent.ocx e transparente.oca, salve os dois em ":WindowsSystem32". Agora use ele em sua aplicação como um componente. Espero ter ajudado.
Rodrigo Ferreira MSN - rjpferreira@hotmail.com
|
TÓPICO EDITADO
|
|
|
|
|