constructor Init(var Bounds: TRect);
Dieser Konstruktor ruft zunächst TWindow.Init auf
und fügt dann ein TCharList-Objekt in das Fenster ein
und speichert einen Zeiger auf dieses Objekt in dem Feld
CharList.
Schließlich wird ein Schalter mit dem Kommando cmChooseFont
eingefügt.