Página 1 de 1

Rolagem de tela em monitor touch screen

Enviado: 16 Set 2025 18:50
por ANDRIL
Olá pessoal!

Sabem se há como detectar uma rolagem de tela pelo harbour/wvg?
Tipo a do celular, arrastar com dedo para cima ou para baixo para fazer a rolagem da tela?

Rolagem de tela em monitor touch screen

Enviado: 17 Set 2025 11:44
por Fernando queiroz
a unica forma que encontrei ate agora em HWGUI é usando a barra de rolagem vertical

Rolagem de tela em monitor touch screen

Enviado: 17 Set 2025 12:18
por mmarcondes
já fiz uns testes faz tempo com delphi na época, ele tinha componentes para identificar monitor de toque e para detectar o movimento, dai você podia associar uma função para fazer algo, mas nas ferramentas do mundo harbour, minigui, hwgui, etc não tem, ai tem que improvisar como o colega fez.

Rolagem de tela em monitor touch screen

Enviado: 17 Set 2025 12:35
por ANDRIL
Olá Fernando,

Estou usando gtWvg. Crio a janela com WvgCrt() defino alguns parametros:

Código: Selecionar todos

oCrt := WvgCrt():New( , , { 0, 0 }, { 24, 79 }, , .T. )	
   oCrt:lModal      := .T.
   oCrt:resizable   := .F.
   oCrt:closable    := .F.
   oCrt:title       := "SISTEMA"
   oCrt:icon        := ICONE_SISTEMA
   oCrt:Create()
Não achei nenhum parametro para ativar a barra de rolagem.

Ou se conseguisse identificar que o usuário esta tentando rolar a tela, exemplo pelo lastkey(), já ajudaria. Pelo lastkey() da para obter o click do mouse = 1002 mas da rolagem não achei.

Obrigado por responder.

Rolagem de tela em monitor touch screen

Enviado: 17 Set 2025 13:05
por carlos_dornelas
Será que pelo 1014 ou 1015 não daria certo (rodinha do mouse)? só um chute...

Rolagem de tela em monitor touch screen

Enviado: 19 Set 2025 17:58
por JoséQuintas

Código: Selecionar todos

   CASE K_MWBACKWARD   ; RETURN K_DOWN
   CASE K_MWFORWARD    ; RETURN K_UP

Rolagem de tela em monitor touch screen

Enviado: 20 Set 2025 17:34
por JoséQuintas
Faltou dizer....
Não se trata de rolagem em touch screen, e sim rolagem em qualquer monitor.