Buchstaben malen

Sie brauchen eine kleine Image-Komponente imEingabe (z.B. 80x80 Pixel), in der der Benutzer mit der Maus einen Buchstaben zeichnen kann. Benutzen Sie die Ereignisprozedur onMouseMove dieser Komponente. Die Parameter X und Y enthalten die neue Position der Maus nach einer Bewegung. Der Parameter Shift enthält den Zustand der Maustasten und der Kontrolltasten. Wenn Shift=[ssLeft] (linke Maustaste gedrückt), dann soll an der neuen Position ein Kreis mit Radius 3 Pixel gezeichnet werden.

Für die Ausgabe brauchen Sie eine große Image-Komponente imAusgabe. Wenn der Benutzer auf einen Punkt dieser Komponente klickt, soll dort nachgezeichnet werden, was er in imEingabe gezeichnet hat. Benutzen Sie die Ereignisprozedur onMouseUp. Die Parameter X und Y enthalten die Position wo geklickt wurde.

Benutzen Sie 2 Arrays, in denen die x- und die y-Position der Punkte gespeichert werden.