TMain - Goethe Gymnasium Dortmund

Wenn man Objekte erst während der Programmlaufzeit erzeugen will, so muß
man dafür sorgen, dass diejenigen Module, in denen die, den Objekten
entsprechenden Klassen definiert sind, unter USES eingebunden werden. Die
Units haben unter Windows leider oft andere Namen als unter Linux.
Beispiel: die Klassen TEdit, TLabel und TButton werden in Windows in der
Unit StdCtrls definiert, in Linux in der Unit QExtCtrls. Die Klassen TImage und
TTimer werden unter Windows in ExtCtrls definiert.
Im folgenden Beispielprogramm werden alle Objekte erst zur Laufzeit erzeugt.
Das Formblatt, also das Objekt namens Main vom Typ TMain, enthält einen
Button, mit dem man die Hintergrundfarbe einstellen kann und ein kleines Bild,
welches sich timergesteuert hin und her bewegt.
Das zugehörige Klassen-Beziehungs-Diagramm sieht so aus:
TForm
1
TImage
TMain
Das etwas ausführlichere Klassendiagramm von TMain:
TMain
− Color, left, top, width,
− height, delta
+ ! Create(),
− ! setbounds(),
− ! machHintergrundBlau,
− ! bewegeBild
1
1
TButton
TTimer
6