Discussion :

[yostone]

Bonjour,

Personne a réussi à faire du multitouch en vb.net ?
Pour le moment j'arrive à détecter que je suis en train de faire un Zoom ou une Rotation avec deux doigts mais je n'arrive pas a avoir les coordonnées des deux doigts en même temps...
C'est le dernier qui bouge qui donne les points !

Merci à vous.

[baloub]

Bonjour,

J'ai aussi développé un programme en VB et winform principalement destiné à une tablette sous windows (mais aussi sur un PC avec écran non tactile).
J'ai rencontré le même manque de doc (surtout en vb !).
Comme j'avais principalement besoin de la gestion des gestes (Pans, Zooms, pressAndTap etc..) j'ai laissé tomber les messages obtenus après WM_TOUCH pour me concentrer sur ceux de WM_GESTURE.
Il est impossible d'avoir les deux types de message en même temps.

Une petite astuce avec WM_PARENTNOTIFY (qui fonctionne en même temps que WM_GESTURE) m'a permit de connaître le nombre de doigts touchant la tablette ce qui me permet d'affiner l'usage de messages comme GID_TWOFINGERTAP qui, contrairement à son nom, fonctionne indifféremment avec une frappe de deux, trois, quatre..... doigts.

[MABROUKI]

bonjour

Tu peux voir ce lien github:
https://github.com/rprouse/WinTouch.NET

[yostone]

bonjour

Tu peux voir ce lien github:
https://github.com/rprouse/WinTouch.NET

Malheureusement cela fonctionne que en C#

[yostone]

Bon, en fait je faisais une erreur d'interprétation.
Je ne sais pas pourquoi mais je pensais que WM_POINTERDOWN fonctionnait comme GID_ZOOM et renvoyait les coordonnées d'un point milieu.

En fait non, on reçoit autant de messages WM_POINTERDOWN que de contacts de doigts :
- un doigt -> un message avec coordonnées
- deux doigts -> deux messages avec coordonnées de chaque point
- trois doigts -> trois messages etc..

Du coup il suffit de stocker les coordonnées reçues dans une liste, puis lors d'un mouse move suivant (ou un GID_PAN) de compter le nombre de points dans la liste et d'appliquer la bonne action.

Je suis tombé sur ce message, tu as donc pu y faire marcher ?

[baloub]

Bonjour,

C'est "l'astuce" dont je parlais.
Je voulais connaître le nombre de points de contact ainsi que les coordonnées dans le cas d'un contact unique.
Si tu as besoin de connaître l'évolution du multi touch dans le temps c'est vers WM_TOUCH qu'il faut t'orienter.
Ci-dessous le principe de la routine:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
 
    <PermissionSet(SecurityAction.Demand, Name:="FullTrust")>
    Protected Overrides Sub WndProc(ByRef m As Message)
       Try
            Select Case m.Msg
 
                Case WM_DISPLAYCHANGE ' traitement suivant un changement de dimensions d'écran (ou rotation)
                    Dim WEcran As Integer = m.LParam.ToInt64 And &HFFFF
                    Dim HEcran As Integer = (m.LParam.ToInt64 >> 16) And &HFFFF
                    traite_orientation(WEcran, HEcran)
                    handled = True
 
                Case WM_GESTURE  ' traitement des messages gestuels (zoom, pan...)
                    handled = DecodeGesture(m)
                    Exit Select
 
                Case WM_PARENTNOTIFY
                    Dim vwparam As Integer = m.WParam.ToInt32 And &HFFFF
                    If vwparam = WM_POINTERDOWN Then
                        tactile = True '
                        Dim xp As Integer = (m.LParam.ToInt32) And &HFFFF
                        Dim yp As Integer = (m.LParam.ToInt32) >> 16
                        Dim obj As Control = FromHandle(WindowFromPoint(New Point(xp, yp))) ' détermine le control qui a été touché
                        PiBoxTouche = obj.Name 
                        Dim coor As Point = obj.PointToClient(New Point(xp, yp)) 'coordonnées du point en valeurs client
 
                        '
                        '
                        ' ici tout un tas de select case en fonction de l'objet touché
                        '
                        '
 
 
                        memoTouch.Add(coor) 'mémo des coordonnées du point touché par un doigt
                        nbDoigts = memoTouch.Count ' mémo du nombre de doigts 
 
                        ' Le timer est de 50ms suffisant pour comptabiliser le nb de doigts avant de vider la liste
 
                        If Timer_MultiDoigts.Enabled = False Then 
                            Timer_MultiDoigts.Start()
                        End If
 
                     End if
             End Select
         MyBase.WndProc(m)
    End Sub
 
    Private Sub Timer_MultiDoigts_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer_MultiDoigts.Tick
        Timer_MultiDoigts.Stop()
        memoTouch.Clear()
    End Sub

[yostone]

Bonjour,

J'ai aussi développé un programme en VB et winform principalement destiné à une tablette sous windows (mais aussi sur un PC avec écran non tactile).
J'ai rencontré le même manque de doc (surtout en vb !).
Comme j'avais principalement besoin de la gestion des gestes (Pans, Zooms, pressAndTap etc..) j'ai laissé tomber les messages obtenus après WM_TOUCH pour me concentrer sur ceux de WM_GESTURE.
Il est impossible d'avoir les deux types de message en même temps.

Une petite astuce avec WM_PARENTNOTIFY (qui fonctionne en même temps que WM_GESTURE) m'a permit de connaître le nombre de doigts touchant la tablette ce qui me permet d'affiner l'usage de messages comme GID_TWOFINGERTAP qui, contrairement à son nom, fonctionne indifféremment avec une frappe de deux, trois, quatre..... doigts.

Idem, je bloque juste sur les coordonnées des deux doigts en même temps ! Franchement si prêt du but je suis vraiment dégoûté