Applies toTWPPreview
DeclarationTWPGetAttrColorEvent = Procedure(Sender: TObject; var CharStyle: TCharacterAttr; par: PTParagraph; posinpar: Integer) of object;
CategorySpecialTextAttr