Ho un picturebox con un'immagine caricata, conosco la sua altezza e larghezza "immagine", tramite due trackbar, una trackbar imposto il valore massimo all'altezza reale dell'immagine è l'altra alla sua larghezza.
Le dimensioni dell'immagine sono prese in questo modo:
,codice:picDemoArea.Image = Image.FromFile(percorso) TrackBar1.Maximum = picDemoArea.Image.Height.ToString TrackBar2.Maximum = picDemoArea.Image.Width.ToString
bene adesso dovrei allo scroll delle due trackbar creare due linee sia orizzontale che verticale, stò provando ad adattare il seguente codice ma non riesco ad allineare le due linee.
in pratica al variare delle trackbar dovrei creare un punto di incontro tra x ed y.codice:Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll picDemoArea.Image = Image.FromFile(TextBox2.Text) Dim graph As Graphics = Graphics.FromImage(picDemoArea.Image) Dim blackPen As New Pen(Color.Red, 3) Dim point1 As New Point(TrackBar2.Value, TrackBar1.Value) Dim point2 As New Point(TrackBar1.Value, TrackBar1.Value) graph.DrawLine(blackPen, point1, point2)

Rispondi quotando