Class for current text attributes.when selection is non-empty then changing its properties also change the document,overwise changes are preserved and applied when user enters new text

THtTextStyle = record
  objectprivatefFontName: string;
  fFontSize: integer;
  fBold: boolean;
  fItalic: boolean;
  fStrikeout: boolean;
  fSubscript: boolean;
  fSuperscript: boolean;
  fUnderline: boolean;
  fBgColor: cardinal;
  fColor: cardinal;
  Editor: THtmlEditor;
  selempty: boolean;
  fTextTransform: TCSSTextTransform;
  fParaAlign: THAlign;
  fOrderedList: boolean;
  fUnorderedList: boolean;
end;