Italian effetto touch flow

Discussion in 'Italian Forum' started by uccio9, Mar 19, 2009.

  1. uccio9

    uccio9 New Member

    ciao ragazzi :sign0085:
    qualcuno sa come si puo fare un effetto tipo touch flow oppure un effetto trascinamento?
     
  2. uccio9

    uccio9 New Member

    praticamente la procedura crea n bottoni su un pannello(panel1) in base a quanti dati sono descritti in un file xml

    h è l'altezza del bottone


    Sub form1_muovi
    'non esce dallo schermo
    If panel1.Top-(box1.Text-box3.Text)>form1.Height-(h*3) OR panel1.top-(box1.Text-box3.Text)<((h*3))-(panel1.Height) Then
    Else
    panel1.Top=panel1.Top-(box1.Text-box3.Text)
    End If

    End Sub

    Sub Form1_MouseUp (ux,uy)
    '
    box1.Text=(form1.Width/2)/10
    box3.Text=(form1.Width/2)/10
    End Sub
    Sub form1_mousedown (dx,dy)
    box1.Text=dy*(3/10)
    End Sub
    Sub Form1_MouseMove (x,y)
    timer1.Interval=1
    timer1.Enabled=True
    box3.Text=y*(3/10)
    End Sub

    Sub timer1_tick
    form1_muovi
    End Sub


    tutto funziona , ma non è fluido. Provato su un palmare si vede tutto a scatti.
     
    Last edited: Mar 22, 2009
  3. uccio9

    uccio9 New Member

    forse non sono stato chiaro ,
    volevo fare una cosa del genere:

    youtube.com/watch?v=f4WF2atnnD8&feature=player_embedded]YouTube - FInger point application launcher

    qualcuno sa se si riesce a fare con b4ppc?
     
  4. Filippo

    Filippo Expert Licensed User

  5. uccio9

    uccio9 New Member

    grazie per la risposta, proverò a guardare

    ciao
     
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice