Applies toTWPStyleDlg
DeclarationTWPOnBeforeChangeStyleEvent = Procedure(Sender: TObject; ThisStyleName: string; var CancelOperation: boolean) of object;