Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

MDi ein Fenster mit Grafik hinzufügen
Autor: mannu
Datum: 27.10.08 17:25
Hier sollte ich meine Frage eingeben Ich habe mich mit Hilfen zu einem MDI "durchgekämpft". Jetzt möchte ich einem weiteren Fenster eine Grafik in einer Piktutebox hinzufügen. Das soll auch einige Eigenschaften bekommen wie Anchor allseits. Wie bekomme ich das hin? Meinen Code hänge ich an. Dank für Hilfe vom Mannu Hier mein Code Public Class frmMain Private Sub NeuesChildFenster(ByVal Titel As String, ByVal Farbe As Color, ByVal Größe As Point) Dim NeueChildForm As New Form() NeueChildForm.MdiParent = Me NeueChildForm.Text = Titel NeueChildForm.Size = Größe NeueChildForm.BackColor = Farbe NeueChildForm.Show() End Sub Private Sub tsmiNeuesFenster_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tsmiNeuesFenster.Click End Sub Private Sub tsmiAllesSchließen_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tsmiAllesSchließen.Click Dim VorhandeneChildForm As Form For Each VorhandeneChildForm In Me.MdiChildren VorhandeneChildForm.Close() Next End Sub Private Sub tsmiNebeneinander_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tsmiNebeneinander.Click Me.LayoutMdi(MdiLayout.TileVertical) End Sub Private Sub tsmiÜbereinander_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tsmiÜbereinander.Click Me.LayoutMdi(MdiLayout.Cascade) End Sub Private Sub tsmiUntereinander_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tsmiUntereinander.Click Me.LayoutMdi(MdiLayout.TileHorizontal) End Sub Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load NeuesChildFenster("Ein großes, grünes Fenster!", Color.Green, New Point(500, 500)) NeuesChildFenster("Ein sehr kleines, rotes Fenster!", Color.Red, New Point(100, 100)) NeuesChildFenster("Ein mittelgroßes, blaues Fenster!", Color.Blue, New Point(250, 250)) NeuesChildFenster("Ein mittelgroßes, blaues Fenster!", Color.Blue, New Point(50, 50)) End Sub End Class

MDi ein Fenster mit Grafik hinzufügen	924	mannu	27.10.08 17:25
Re: MDi ein Fenster mit Grafik hinzufügen	493	Julian13	27.10.08 18:37
Danke für Grafik hinzufügen	487	mannu	28.10.08 18:52

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übersicht

Suchen