DEsativar e ATIVAR o MOuse

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

paiva
Usuário Nível 3
Usuário Nível 3
Mensagens: 300
Registrado em: 04 Ago 2005 10:28

DEsativar e ATIVAR o MOuse

Mensagem por paiva »

Por favor

o xh_nomouse() DESATIVA o mouse + como ATIVA-lo DENOVO ?
ja tentei tudo e todas a variaçoes e nada faz ele VOLTAR.

Onde esta esse xh_nomouse() ? sera que lá fala como REATIVAR

* wvw_setmousemove(,.t.)
* MSETCURSOR(.T.)
* MSETPOS(10,10)

*ft_mcursor(.T.)
*ft_mreset()
*ft_mconoff(01,00,01,79)
*ft_mshowcrs()

*MShow()
*msginfo(mHide())
*MSetCursor(.t.)
*setcursor(1)
*set(39,159) // Ativa o Mouse no xHarbour - 22/08/2005
* Wvw_SetMouseMove( , .T. )
*dc_moushow()
*ft_mshowcrs()
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, link a WHAT32.LIB e use os comandos abaixo:

ShowCursor(0) // desativa o MOUSE
ShowCursor(1) // Ativa o MOUSE

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
paiva
Usuário Nível 3
Usuário Nível 3
Mensagens: 300
Registrado em: 04 Ago 2005 10:28

Habilitar e Desabilitar Mouse - RESOLVIDO

Mensagem por paiva »

RESOLVIDO !!!

criei um FLAG e alterei a classe do MOUSE para ignora-lo se o FLAG
estiver LIGADO (RS)

antes do READ LIGO e depois dele DESLIGO

NAO afeta os Buttons etc

PAiva
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Tche, Paiva...se não for pedir de mais..posta ai no detalhe como vc resolveu isso ..que alterações vc fez e onde ?

Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
paiva
Usuário Nível 3
Usuário Nível 3
Mensagens: 300
Registrado em: 04 Ago 2005 10:28

Habilitar e Desabilitar Mouse nos GETS

Mensagem por paiva »

EU tinha feito alterando o wvwmouse.prg + ai o Anderson Cardoso mostrou como ele faz. Testei e funcionou OK ai troquei para o Modo que ele ensinou Porque NAo precisa mexer em prg em futuras atualizacoes.



MOUSE := SET(39) // Pega o valor padrao que seve ser "mouse desabilitado"

Set(39, 159) // Habilita eventos do mouse, já sabemos que é 159, certo?

SET(39, MOUSE) // Desabilita o mouse.
Avatar do usuário
momente
Usuário Nível 3
Usuário Nível 3
Mensagens: 496
Registrado em: 03 Mar 2005 11:53
Localização: São Carlos-SP
Contato:

Re: DEsativar e ATIVAR o MOuse

Mensagem por momente »

Amigos,

Preciso desabilitar o cursor do mouse em determinado momento mas não estou conseguindo, pois se ele estiver habilitado e o usuário tocar no mouse ele carrega o caracter "Ú", alguém tem algum exemplo para isto, pois este citado não consegui executar, estou utilizando xharbour+visual Lib.

Obrigado!
Rogerio L. Momenté
Nada é tão perfeito que não possamos melhorar.
Nunca se explique. Seus amigos não precisam e seus inimigos não vão acreditar.
www.looksystem.com.br
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: DEsativar e ATIVAR o MOuse

Mensagem por sygecom »

Nunca aconteceu isso comigo ! qual versão do xharbour ? e de onde pegou a vl que esta usando ?
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder