Problem mit Label

[shmia]

1.) Paintbox und TLabel passen nicht zusammen
du musst direkt auf dem Canvas deinen Text ausgeben:
Canvas.TextOut(hRand, vrand, zimmerNummer);
2.) deine Klasse TZimmer braucht die Eigenschaft Canvas, damit es von aussen mitgeteilt bekommt,
worauf es sich selbst zeichnen soll.
Es darf kein Zugriff von TZimmer auf Hotelform stattfinden!
Stichwort: Obejktorientiertes Programmieren, Kapselung