Delphi-PRAXiS - Delphi [DirectX]Quadrat wird nicht angezeigt

Also, ich habe keine Ahnung was das los ist. Ich habe gestern Abend mein Projekt noch starten können und ein Quadrat wurde gedreht.
Habe das dem Buch "DirectX9 in Delphi" nachprogrammiert.

Ich weiss einfach nicht wo das Problem liegt, kann sein dass ich gestern Abend vor dem Schlafen zwei Zeilen geändert habe, aber ich sehe einfach keinen Fehler. Das Problem habe ich bei DirectX irgendwie öfter, dass Sachen einfach nicht angezeigt werden.

Ich hänge das Projekt mal an und hoffe, dass ihr mir sagen könnt wo der Fehler liegt, damit mir das in zukünftigen Projekten nichtmehr passiert.

Grüße