Rolagem de tela em monitor touch screen

[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?

[Fernando queiroz]

a unica forma que encontrei ate agora em HWGUI é usando a barra de rolagem vertical

[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.

[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.

[carlos_dornelas]

Será que pelo 1014 ou 1015 não daria certo (rodinha do mouse)? só um chute...

[JoséQuintas]

Código: Selecionar todos

   CASE K_MWBACKWARD   ; RETURN K_DOWN
   CASE K_MWFORWARD    ; RETURN K_UP

[JoséQuintas]

Faltou dizer....
Não se trata de rolagem em touch screen, e sim rolagem em qualquer monitor.