Página 1 de 1
mouse ativar/desativar
Enviado: 25 Out 2018 16:55
por paiva_dbdc
Boa
o mouse esta ativo no sistema.
quando vou INcluir um registro, desativo o mouse com set(39,xxx) pelo que vi qq valor de xx ele desativa o mouse
apos incluir uso set(39,159) para ATIVAR o mouse ++++ ele NAo esta sendo ativado
qual seria o comando correto para ativar...
INTERESSANTE se saio do prg e chamo ele de novo (SEM sair do sistema) o Mouse volta a ser ATIVO
ja esquentei a cabeça para entender e nada
alguem teria um comando que funcione para ATIVAR o mouse ?
uso XHB + wvw
desde ja agradeco
PAiva
mouse ativar/desativar
Enviado: 25 Out 2018 17:05
por Toledo
Paiva, tenta este comando:
Código: Selecionar todos
SET(39,128) //Desativa o Mouse
SET(39,255) //Ativa o Mouse
Abraços,
mouse ativar/desativar
Enviado: 25 Out 2018 17:39
por alxsts
Olá!
Existem funções próprias para tratamento do mouse. Estas abaixo existem desde o Clipper 5.3 e funcionam tanto no Harbour quanto no xHarbour:
MPresent() --> Retorna verdadeiro se existir um mouse instalado ou falso em caso contrário
MShow() --> Exibe o ponteiro do mouse
MHide() --> Oculta o ponteiro do mouse
mouse ativar/desativar
Enviado: 25 Out 2018 17:51
por JoséQuintas
Eu nem mexo com mouse, prefiro ele sempre ativo.
Isso se refere a apenas esconder o desenho do cursor, ou algo mais?
Lembre-se que o Windows usa o mouse, então o default é aparecendo.
Se for referente a travar a janela ao clicar com o mouse, a solução é outra, acabei de postar sobre isso, por coincidência.
mouse ativar/desativar
Enviado: 25 Out 2018 17:52
por paiva_dbdc
MUITO obrigado
SET(39,255) //Ativa o Mouse
funcionou
Obrigado
mouse ativar/desativar
Enviado: 25 Out 2018 18:15
por alxsts
Olá!
JoséQuintas escreveu:Lembre-se que o Windows usa o mouse, então o default é aparecendo.
É... o Windows comanda. Estas funções devem funcionar apenas na antiga tela cheia do DOS. Não sei como se comportariam com alguma GT. Nem o comando Set(...) funcionou na janela do CMD.
Código: Selecionar todos
#include "box.ch"
Proc Main
SetMode(25,80)
CLS
DispBox( 0,0,MaxRow(), MaxCol(), B_SINGLE, + " " )
If MPresent()
Wait "Mouse instalado. Pressione algo..."
Endif
Wait " Pressione algo para esconder o ponteiro do mouse"
MHide()
Wait " Pressione algo para mostrar o ponteiro do mouse"
MShow()
SET(39,255) //Ativa o Mouse
Wait " Pressione algo "
__Quit()
paiva_dbdc escreveu:SET(39,255) //Ativa o Mouse
funcionou
Como você fez? Está usando GT?
mouse ativar/desativar
Enviado: 25 Out 2018 19:30
por JoséQuintas
No primeiro post ele mencionou xHarbour + gtwvw.
gtwvw acaba sendo janela Windows.