Font/Hintergrundfarbe vom Objekt

[EWeiss]

Wie kann ich erfahren welchen Font ein Objekt verwendet.
Als Beispiel Checkbox von der nur das Handle bekannt ist.

Ich will die Hooken und benötige dafür den Font und die Hintergrundfarbe von dem Control.

gruss

[EWeiss]

Vielleicht kann mir dabei jemand helfen..
Ich übergebe den Font jetzt direkt.

CK.Font := Form1.CheckBox1.Font;

Wie bekomme ich denn nun den Namen des Font auf LogFont.lfFaceName umgelegt ?
LogFont.lfFaceName := Font.Name;

verträgt sich nicht.
[DCC Fehler] uCheckboxHook.pas(415): E2010 Inkompatible Typen: 'Array' und 'TFontName'

EDIT:
Hat sich erledigt.
StrPCopy(LogFont.lfFaceName, Font.Name);

gruss