Structure TPunkt
        Public x As Integer
        Public y As Integer
        Public farbe As Color   ' long für rgb farben...
        Public modus As Byte    ' Punkt, Linie, etc...
    End Structure
 
    Structure TFrame
        Public Punkt() As TPunkt
    End Structure
 
    Structure TFigur
        Public Frame() As TFrame
 
    End Structure
 
    Public Hauptfigur() As TFigur