+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 5 su 5

Muovere due linee a runtime

  1. #1
    L'avatar di imbranato
    imbranato non è in linea Scolaretto
    Post
    293
    Like Inviati  
    0
    Like Ricevuti  
    0
    Mi è sorta la necessità di disegnare due linee intersecate(a mò di più) e spostarle contemporaneamente con il Mouse… il problema più VERGOGNOSO è che non riesco neppure ad intersecarle. Chi mi spiega i parametri di DRAWLINE? So che sono X1 e Y1 primo punto e X2 e Y2 secondo punto ma …
    Oltre a questo vorrei muoverle insieme in base alle coordinate del mouse. Grazie e ciao

  2. #2
    L'avatar di elisab
    elisab non è in linea Scribacchino
    Post
    1,750
    Like Inviati  
    0
    Like Ricevuti  
    0
    Posta il codice che stai cercando di usare.
    ℹ️ Leggi di più su elisab ...

  3. #3
    L'avatar di imbranato
    imbranato non è in linea Scolaretto
    Post
    293
    Like Inviati  
    0
    Like Ricevuti  
    0
    è uno schifo e me ne scuso ...
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim Linea, Linea2 As New Drawing.Pen(System.Drawing.Color.Black, 3)
            Linea.Color = Color.Black()
            Me.CreateGraphics.DrawLine(Linea, 100, 25, 50, 25)
            Me.CreateGraphics.DrawLine(Linea2, 50, 100, 10, 50)
        End Sub
    
    vorrei capirci di più ma ... di grafica zero e meno di zero!
    ciao

  4. #4
    L'avatar di elisab
    elisab non è in linea Scribacchino
    Post
    1,750
    Like Inviati  
    0
    Like Ricevuti  
    0
    Ciao
    per disegnare una linea passi le coordinate di due punti tra i quali viene tracciata la linea.
    e.Graphics.DrawLine(blackPen, x1, y1, x2, y2)
    
    Dal punto A(x1,y1) al punto B(x2,y2)

    Se i punti hanno valore di y uguale la linea è orizzontale
    Se i punti hanno valore di x uguale la linea è verticale

            Dim Linea As New Drawing.Pen(System.Drawing.Color.Black, 3)
    
            Dim g As Graphics = Me.CreateGraphics
            'orizzontale
            g.DrawLine(Linea, 100, 25, 50, 25)
            'verticale
            g.DrawLine(Linea, 50, 100, 50, 10)
            g.Dispose()
    
    Quando crei oggetti grafici devi ricordarti di distruggerli
    ℹ️ Leggi di più su elisab ...

  5. #5
    L'avatar di imbranato
    imbranato non è in linea Scolaretto
    Post
    293
    Like Inviati  
    0
    Like Ricevuti  
    0
    questa mattina ti avevo risposto ma noto che la mia risposta non è arrivata ...
    grazie tante, ci provo e modifico e poi ti farò vedere il risultato
    sei molto brava!

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Muovere su una form un DataGridView
    Da glak nel forum Visual Basic .Net
    Risposte: 3
    Ultimo Post: 13-09-2011, 01:55
  2. Risolto: Muovere picturebox
    Da ken1986 nel forum Visual Basic .Net
    Risposte: 3
    Ultimo Post: 07-09-2010, 08:54
  3. muovere picturebox a runtime col mouse
    Da panatronic nel forum C#
    Risposte: 3
    Ultimo Post: 11-05-2010, 13:19
  4. muovere il mouse con la tastiera
    Da stejano nel forum Visual Basic 6
    Risposte: 2
    Ultimo Post: 07-04-2006, 19:37
  5. muovere la stampante con vb
    Da stefano_ nel forum Visual Basic 6
    Risposte: 4
    Ultimo Post: 23-07-2005, 13:13