COMO MOVER UMA IMAGEM PELO O MAUSE

USUARIO.EXCLUIDOS 23/11/2006 14:08:20
#185926
eu quero clicar numa imagem e arastar a imagem para onde eu quiser auguem pode me ajuda ae








valeu abraços para quem responder
USUARIO.EXCLUIDOS 23/11/2006 14:48:16
#185939
onde está essa imagem?? em um picture box?? em um image??
no Fundo do Formulario??

Passe mais detalhes..
USUARIO.EXCLUIDOS 23/11/2006 15:18:37
#185946
eu quero clicar na image1 ai arastar para onde eu quiser


espero que tenhan enendido



abraços
FELIPEA 23/11/2006 18:22:56
#185981
Olha kra, achei esses 3. veja e dps posta

http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=3899&TxtSearch=mover%20imagem&CmbSort=&varPagina=1
http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=6076&TxtSearch=mover%20imagem&CmbSort=&varPagina=1
http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=3038&TxtSearch=mover%20imagem&CmbSort=&varPagina=1
USUARIO.EXCLUIDOS 23/11/2006 18:25:54
#185983
Cara, veja o exemplo que eu postei: MOVER IMAGEM SEM DRAGANDDROP...

Qualquer dúvida poste...flw
USUARIO.EXCLUIDOS 23/11/2006 19:15:33
#185994
eu quero saber o codigo para passar para o meu amigo da escola que tambem sabe mexer com vb/vba passe os codigos fmz
CLEVERTON 23/11/2006 19:30:51
#185996
O Código que o matioli lhe passou funciona perfeitamente.
USUARIO.EXCLUIDOS 23/11/2006 21:34:07
#186009
não esta dande certo olha os codigos abaixo


Private Sub picMove_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  If Button = vbLeftButton Then
    picMove.Tag = X & "/" & Y
end if
LIONHEART 24/11/2006 07:19:33
#186032 Resposta escolhida
Meu, se não explicar direito não dá, né....



Dim bClicando As Boolean


Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    bClicando = True
End Sub


Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If bClicando Then
        Image1.Left = X
        Image1.Top = Y
    End If
End Sub


Private Sub Image1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    bClicando = False
End Sub
USUARIO.EXCLUIDOS 24/11/2006 12:06:18
#186144
esse coigo acima é para mover a imagem né
CLEVERTON 24/11/2006 12:26:55
#186146
Citação:

HIQUE-BLUE escreveu:
esse coigo acima é para mover a imagem né



VC já testou o código ao menos ?
Estamos aqui para auxiliar, e não para trabalhar para os outros.
Parece que vc está querendo um código pronto, testado e aprovado. No entanto já me passou três MP pedindo.

O Código que o matioli passou funciona perfeitamente!
Basta vc testa-lo.

HIQUE-BLUE
Se vc não leu as regras vou te passar este Link com as REGRAS

e olha um trecho de uma regra

  • Código fonte completo
    Citação:


    Se seu intuito é pedir código fonte completo e de graça esqueça, escrever programas é sempre um sacrificio, para alguém com certeza, pode não ser para você que vai usar, mas para quem escreveu houve tempo, desgaste e trabalho. Se você quer encontrar algum código de referência ao que precisa, navegue no site, mas não adianta postar tópicos só para pedir código fonte.



  • Respeite seus colegas
    Citação:


    Por favor tenha o mínimo de etiqueta, respeite as pessoas para que elas te respeitem, não seja grosso com seus colegas e tão pouco mal-educado. Não utilize palavrões ou até mesmo palavras de baixo calão, estamos aqui para ajudar e não para trocar ofensas.




    •
    Página 1 de 2 [11 registro(s)]
    Tópico encerrado , respostas não são mais permitidas
    Voltar