Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
C# / VB.NET - Trascinare picturebox
Forum - C# / VB.NET - Trascinare picturebox

Avatar
n00b (Normal User)
Newbie


Messaggi: 1
Iscritto: 01/07/2008

Segnala al moderatore
Postato alle 15:07
Martedė, 01/07/2008
Ciao,

Sono nuovo e ho trovato il vostro sito , mentre "googlavo".
Non sono sicuro sia la sezione giusta perchč vorrei porvi una domanda su vb 2008.
Io qualche anno fa programmavo un po in VB6, ora mi ci sono rimesso, ma sono molto spaesato.

Vorrei poter trascinare delle picturebox prelevate da una barra di oggetti che sta a sinistra (come fa vb).
Ho trovato qualcosa sul vostro sito , ma nel mio caso gli oggetti vengono creati dinamicamente

Codice sorgente - presumibilmente VB.NET

  1. Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
  2.  
  3.  
  4. Dim RBC() As RadioButton = {RadioButton1, RadioButton2, RadioButton3}
  5.         Dim obj As New Label
  6.         Dim objImgPath As String
  7.  
  8.         objImgPath = "c:\windows\zapotec.bmp"
  9.  
  10.         For Each ind As RadioButton In RBC
  11.  
  12.             If ind.Checked = True Then
  13.                 'MsgBox(RBC.IndexOf(RBC, ind))
  14.  
  15.                 If RBC.IndexOf(RBC, ind) = 0 Then objImgPath = "c:\windows\zapotec.bmp"
  16.                 If RBC.IndexOf(RBC, ind) = 1 Then objImgPath = "c:\windows\prateria.bmp"
  17.                 If RBC.IndexOf(RBC, ind) = 2 Then objImgPath = "c:\windows\piume.bmp"
  18.                 Me.Controls.Add(obj)
  19.  
  20.             End If
  21.  
  22.         Next
  23.  
  24.  
  25.         Label1.Text = e.X
  26.         Label2.Text = e.Y
  27.  
  28.  
  29.  
  30.         obj.Text = "go"
  31.         obj.Image = Image.FromFile(objImgPath)
  32.  
  33.         obj.Location = New System.Drawing.Point(CInt(Label1.Text), CInt(Label2.Text))



Le immagini sono prese dalla cartella di windows come esempio.
Scelgo l'oggetto con i radiobutton , a secondo di cosa scelgo , con il mouse posso trascinare una delle tre immagini.
Vorrei chiedervi:
Esiste un modo pių logico di fare quanto sopra programmato ?
Come posso evitare di creare quella scia grafica fastidiosa quando mi sposto con l'oggetto


PM Quote
Avatar
Il Totem (Admin)
Guru^2


Messaggi: 3635
Iscritto: 24/01/2006

Segnala al moderatore
Postato alle 14:20
Sabato, 12/07/2008
Forse intendi un drag & drop? Non ho capito bene.

PM Quote