so wie es aussieht hast du das ganze noch nicht ganz verstanden...
also ich hab hier mal nen Button aus dem Kopf:
das ist so mal die grobe Funktion...Natürlich fehlt noch Text und ein solcher Button ist nicht schön, aber das darfst du selber machen
also ich hab hier mal nen Button aus dem Kopf:
VB.NET-Quellcode
- Public Class Button
- Inherits UserControl
- Enum ButtonState
- Normal
- Over
- Down
- End Enum
- Private m_State As ButtonState = ButtonState.Normal
- Private Sub Button_Paint(sender As Object,e As PaintEventArgs)Handles Me.Paint
- Select Case m_State
- Case ButtonState.Normal
- e.Graphics.FillRectangle(Brushes.DarkGray,0,0,Me.Width,Me.Height)
- Case ButtonState.Over
- e.Graphics.FillRectangle(Brushes.LightGray,0,0,Me.Width,Me.Height)
- Case ButtonState.Down
- e.Graphics.FillRectangle(Brushes.AliceBlue,0,0,Me.Width,Me.Height)
- End Select
- End Sub
- Private Sub Button_MouseEnter(sender As Object, e As MouseEventArgs)Handles Me.MouseEnter
- m_State = ButtonState.Over
- End Sub
- Private Sub Button_MouseLeave(sender As Object,e As MouseEventArgs)Handles Me.MouseLeave
- m_State = ButtonState.Normal
- End Sub
- Private Sub Button_MouseDown(sender As Object,e As mouseEventArgs)Handles Me.MouseDown
- m_State = ButtonState.Down
- End Sub
- Private Sub Button_MouseUp(sender As Object,e As MouseEventArgs)Handles Me.MouseUp
- m_State = ButtonState.Over
- End Sub
- End Class
das ist so mal die grobe Funktion...Natürlich fehlt noch Text und ein solcher Button ist nicht schön, aber das darfst du selber machen
Ich wollte auch mal ne total überflüssige Signatur:
---Leer---
---Leer---