Delphi-PRAXiS - Flaggendemo - Nationalflaggen zeichen

Hi,
dieses Demo habe ich als Lernprojekt (speziell auch für Anfänger) angelegt.
Es soll als Beispiel dienen, wie man auf TImage und TPaintbox bestimmte Dinge zeichnen kann.
Insbesondere ist das Zeichnen der Nationalflaggen von Deutschland, Frankreich, Irland, Belgien, Italien und Spanien in eine eigene Klasse ausgelagert um den gleichen Code sowohl für das Image als auch für die Paintbox verwenden zu können.

Ausserdem wird gezeigt, dass man beim Zeichnen vorhandenen Code durchaus wiederverwenden kann.
Frankreich, Belgien und Italien verwenden z.B. die gleiche Funktion (nur mit anderen Farben).