Kreslení na bitmapu v pictureboxu?   otázka

VB.NET, Komponenty, Grafika

Ahoj všem, mám problém a prosím o radu.Tento kód je dle mého správný avšak nic se po kliknutí na tlačítko neděje:

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        Dim myBitmap As New Bitmap(PictureBox3.Image)
        Dim g As Graphics = Graphics.FromImage(myBitmap)

        g.DrawLine(Pens.Yellow, 5, 5, 100, 100)
        g.Dispose()

        PictureBox3.Image = myBitmap
        PictureBox3.Refresh()
End Sub

Kód by měl vykreslit žlutou čáru na PictureBox3 kde je načten obrázek, čili čára by měla být na obrázku, bohužel se nic neděje :(. Děkuji za případné rady.

nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět

A to kvôli tomu musíte robiť obrázok navyše ? Skúste :

Dim g As Graphics = Graphics.FromImage(PictureBox3.Image)
...
g.Flush()
g.Dispose()
PictureBox3.Invalidate()

nahlásit spamnahlásit spam 0 odpovědětodpovědět
                       
Nadpis:
Antispam: Komu se občas házejí perly?
Příspěvek bude publikován pod identitou   anonym.
  • Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
    Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.
  • Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

Uživatel:
Heslo:

zapomenuté heslo

 

založit nový uživatelský účet

zaregistrujte se

 
zavřít

Nahlásit spam

Opravdu chcete tento příspěvek nahlásit pro porušování pravidel fóra?

Nahlásit Zrušit

Chyba

zavřít

feedback