TcxOnGetContentStyleEvent = procedure(Sender: TObject; AData: Pointer; out AStyle: TcxStyle) of object;