Probleme changer Top et Left ...

Question

Slt, je voudrais changer le Top et le Left d'une picture en appuyant sur les touches.Je suis d&#233;butant.
Voici le code que j'ai mis
 
Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode 37 Then Picture1.Left Left + 20If KeyCode 38 Then Picture1.Top Top + 20If KeyCode 39 Then Picture1.Left Left - 20If KeyCode 40 Then Picture1.Top Top - 20
End Sub

merci

PCPT · Answer

salut, t'as pas beaucoup cherché, si? :-$ voici en VB6 Option Explicit ' ' Private Sub Form_Load() Me.KeyPreview = True End Sub ' ' Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) With Picture1 Select Case KeyCode Case vbKeyLeft: .Left = .Left - 100 Case vbKeyUp: .Top = .Top - 100 Case vbKeyRight: .Left = .Left + 100 Case vbKeyDown: .Top = .Top + 100 End Select End With End Sub Coloration syntaxique automatique [AFCK] ++ PCPT [AFCK]

cs_vpoyo · Answer

en fait il faut d&#233;clarer l'&#233;v&#232;nement au niveau de la form

de plus fait attention dans les signes. et &#233;galement n'oublie que c'est
les coordonn&#233;es top et left du picture box que tu manipule

quand tu &#233;cris Picture1.Top = Top + 20 en fait ca va mettre le top de ta form +20.



voici mon code en vb.net mais en vb6 y a pas grand chose qui change


Private Sub Picture1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown

        If e.KeyCode 37 Then PictureBox1.Left PictureBox1.Left - 20

        If e.KeyCode 38 Then PictureBox1.Top PictureBox1.Top - 20

        If e.KeyCode 39 Then PictureBox1.Left PictureBox1.Left + 20

        If e.KeyCode 40 Then PictureBox1.Top PictureBox1.Top + 20

    End Sub



Vincent

PCPT · Answer

re,
on ne d&#233;place pas un objet avec les fl&#232;ches dans ce cas de figure en reprenant ses coordonn&#233;es &#224; la pression, puisqu'il peut perdre le focus, mais bien sur la Form!
++

OneHacker · Answer

pcpt, c'est juste mais &#224; quoi sert keypreview ?

Redman

PCPT · Answer

tu poses cette question alors que tu affirmes sur un autre post que cette propri&#233;t&#233; existe sous 2005, qu'elle est en rapport avec un probl&#232;me &#233;nonc&#233;, et tout &#231;&#224; sans avoir toi-m&#234;me 2005 ?
&#233;trange VbFrance ces derniers temps.....

KeyPreview permet &#224; la Form de recevoir les touches press&#233;es avant l'objet contenu les n&#233;cessitants.
exemple, un TxtBox, la Form recevra alors les caract&#232;res saisis avant leur affichage....

ps : LePtiGwen -> pense &#224; clot&#251;rer ton topic en validant la ou les r&#233;ponses r&#233;solvant ton probl&#232;me

++
PCPT   [AFCK]

OneHacker · Answer

Je pensais que le KeyPreview &#233;tait pour les MenuItem control pour leur shortcut, mais les KeyPreview comme tudis ne servent &#224; rien pusique il suffit de presser les touches pour que ca marche !

Redman

PCPT · Answer

au code donn&#233;, ajoute une TxtBox et enl&#232;ve le KeyPreview. la Picture ne bougera pas.
ce n'est pas parce que tu d&#233;couvres une option ou une lacune que "&#231;&#224; sert &#224; rien" ....

OneHacker · Answer

Je pensais pas que ca faisait ca ! D&#233;sol&#233; !

Redman

PCPT · Answer

sauf erreur mais sinon, je ne l'aurais pas mis sans raison!
donc mieux vaut demander ou v&#233;rifier avant d'affirmer que &#231;&#224; ne sert &#224; rien, sans savoir!

pas de mal.
bonne continuation
PCPT   [AFCK]

OneHacker · Answer

Merci PCPT

Redman

Probleme changer Top et Left ...

10 réponses

Discussions similaires