Checkbox Quadrat setzen

[SneakyBagels]

Danke für die Antwort. Das hilft leider nicht.
Meine CheckBoxen werden bereits alle korrekt angezeigt. Es handelt sich hierbei um eine abgeleitete Form des TShellTreeView nur mit CheckBoxen.
Durch obigen Code wird der Haken gesetzt oder entfernt. Dafür ist $2000 verantwortlich. Nur kenne ich den Wert von diesem soliden Quadrat nicht welches man anstatt eines Hakens verwenden kann.