vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Grafik erstellen und aktualisieren 
Autor: catachanfighter
Datum: 18.07.07 22:02

Habe ich gemacht.
Die PictureBox wird auch neu gezeichnet aber nur wenn ich z.B. das Fenster in den Randbereich schiebe, also wenn eine Neuzeichnung fällig wird.
Wenn aber weder das zusätzliche Fenster über der PictureBox liegt oder das Fenster irgendeinen anderen Anlass hat sich neu zu zeichen wird die PictureBox nicht neu gezeichnet.
Wie kann ich nun der PictureBox den Anlass geben dass sie sich beim Schließen des Fensters neu zeichnet?
Bei PictureBox.Invalidate () zeichnet sich es nicht neu, sondern löscht sich.

Hier mal der Quellcode der beiden Fenster

Im Hauptfenster steht folgender Quelltext:

Public Sub pctZeichnungsflaeche_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles pctZeichnungsflaeche.Paint
formGraphics = pctZeichnungsflaeche.CreateGraphics()
If iS_Knotennummer = 0 Then

ElseIf iS_Knotennummer > 0 Then
For iS_i = 1 To iS_Knotennummer
formGraphics.FillRectangle(myBrush, New Rectangle(faE_Knoten(iS_i, 1), faE_Knoten(iS_i, 2), 4, 4))
Next
End If
End Sub

Im weiteren Fenster werden die Koordinaten der Punkte festgelegt.

Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
If IsNumeric(txtxKoordinate.Text) And IsNumeric(txtyKoordinate.Text) Then

frmFachwerk.faE_Knoten(frmFachwerk.iS_Knotennummer + 1, 0) = frmFachwerk.iS_Knotennummer
frmFachwerk.faE_Knoten(frmFachwerk.iS_Knotennummer + 1, 1) = txtxKoordinate.Text
frmFachwerk.faE_Knoten(frmFachwerk.iS_Knotennummer + 1, 2) = txtyKoordinate.Text

Dim KnotenListeneintrag As New ListViewItem(frmFachwerk.iS_Knotennummer + 1)

KnotenListeneintrag.SubItems.Add(frmFachwerk.faE_Knoten(frmFachwerk.iS_Knotennummer + 1, 1))
KnotenListeneintrag.SubItems.Add(frmFachwerk.faE_Knoten(frmFachwerk.iS_Knotennummer + 1, 2))

frmFachwerk.lstKnoten.Items.AddRange(New ListViewItem() {KnotenListeneintrag})
frmFachwerk.iS_Knotennummer = frmFachwerk.iS_Knotennummer + 1

Me.Close()
frmFachwerk.pctZeichnungsflaeche.Update()
Else
MessageBox.Show("Keine Koordinaten gewählt!", "Fehlermeldung")
End If

Ich hoffe jemand kann mir weiter helfen


Gruß Marco
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Grafik erstellen und aktualisieren1.075catachanfighter12.07.07 10:32
Re: Grafik erstellen und aktualisieren767rub12.07.07 10:56
Re: Grafik erstellen und aktualisieren726catachanfighter12.07.07 12:14
Re: Grafik erstellen und aktualisieren725GPM12.07.07 12:34
Re: Grafik erstellen und aktualisieren731catachanfighter12.07.07 12:39
Re: Grafik erstellen und aktualisieren988GPM12.07.07 12:56
Re: Grafik erstellen und aktualisieren720catachanfighter12.07.07 19:45
Re: Grafik erstellen und aktualisieren753catachanfighter13.07.07 09:33
Re: Grafik erstellen und aktualisieren713rub13.07.07 10:04
Re: Grafik erstellen und aktualisieren754catachanfighter18.07.07 16:04
Re: Grafik erstellen und aktualisieren733rub18.07.07 16:22
Re: Grafik erstellen und aktualisieren721catachanfighter18.07.07 22:02
Re: Grafik erstellen und aktualisieren689GPM19.07.07 00:36
Re: Grafik erstellen und aktualisieren736Einergehtnoch19.07.07 23:14
Re: Grafik erstellen und aktualisieren700catachanfighter20.07.07 11:51
Re: Grafik erstellen und aktualisieren672Einergehtnoch20.07.07 20:51
Re: Grafik erstellen und aktualisieren707catachanfighter22.07.07 11:30

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel