Hallo,
Ich habe eine kleine DigitalUhr gebastelt.
Ich habe aber das Problem, dass der Speicher trotz der Anweisung Dispose wächst.
Hier mal der Code:
Spoiler anzeigen
Hätte da jemand eine Idee, wie ich das Problem bewältigen kann?
Danke im Voraus
MfG GTW
Ich habe eine kleine DigitalUhr gebastelt.
Ich habe aber das Problem, dass der Speicher trotz der Anweisung Dispose wächst.
Hier mal der Code:
VB.NET-Quellcode
- Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
- Panel2.BackgroundImage = DrawClock()
- End Sub
- Private Function DrawClock() As Bitmap
- _bitmap = New Bitmap(Panel2.Width, Panel2.Height)
- Using g = Graphics.FromImage(_bitmap)
- Dim rect As New Rectangle(0, 0, _bitmap.Width, _bitmap.Height)
- Dim fill As New LinearGradientBrush(rect, Color.White, Color.LightGray, LinearGradientMode.Vertical)
- g.FillRectangle(fill, rect)
- g.DrawString(Now.ToString, New Font("Verdana", 12, FontStyle.Regular), Brushes.White, 9, 9)
- g.DrawString(Now.ToString, New Font("Verdana", 12, FontStyle.Regular), Brushes.BlueViolet, 8, 8)
- g.Dispose()
- End Using
- Return _bitmap
- _bitmap.Dispose()
- End Function
Hätte da jemand eine Idee, wie ich das Problem bewältigen kann?
Danke im Voraus
MfG GTW