ColorDialog mit OnChange gesucht

[Nelphin]

Hallo,

ich möchte gerne das der Benutzer diverse Farbeinstellungen vornehmen kann, nun funktioniert das auch gut über TColordialog.
Noch schöner wäre es, wenn der Benutzer seine Änderung schon innerhalb des Dialogs sehen könnte aber es scheint kein OnChange Event zu geben.
Ich hab versucht über einen Timer die ColorDialog.Color dauernd abzufragen aber die scheint sich erst bei .execute zu ändern.
Es ist halt lästig das der Benutzer den Dialog erst schließen muss um das Ergebnis zu beurteilen, dann gefällt die Farbe nicht, wieder öffnen, wieder schliessen usw..

Kennt jemand eine alternative oder kann man das OnChange Event irgendwie an einen TColorDialog dranbasteln?

Danke!