Hallo,
in meinem neuen Programm geht es um ein Kaleidoskop.
Im Programm entnehme ich einem Bild ein Quadrat oder Dreieck und setze Kaleidoskopbilder zusammen, in dem durch Aneinanderreihung der Dreiecke oder Quadrate die Ebene parkettiert wird. Die Parkettkacheln gehen dabei durch Rotation, Achsenspiegelung oder Translation auseinander hervor. Im Ergebnis erhält man interessante, symmetrische, schöne Muster.
Mir gefallen sie auf jeden Fall.
Zuerst wird eine Abbildung geladen oder eine aus der Liste gewählt. Unter "Transformationsverfahren" wird die Konstruktionsvorschrift eingestellt.
Im rechten Fensterteil sieht man ein rotes Quadrat. Dies gibt den Bereich an, der ausgewählt wird, und kann mit der Maus verschoben werden.
Programmtechnisch war das Spiegeln und Drehen der Dreiecke etwas Aufwand. Bei den Quadraten ging es. Auch das transparente Kopieren der gedrehten Dreiecke wollte mein Delphi 5 am Anfang nicht so richtig. Aber etwas "Zureden" hilft immer.
Viel Spaß beim Erzeugen neuer Muster
Beste Grüße
Mathematiker
Töten im Krieg ist nach meiner Auffassung um nichts besser als gewöhnlicher Mord. Albert Einstein