Class TWPTextStyle

Hierarchy

System.TObject | TWPTextStyle

Subclasses

WPIOReadRTF.TWPRTFReaderStack | WPRTEDefs.TParagraph | WPRTEDefs.TWPReadOleData | WPRTEDefs.TWPReadPictData | WPRTEDefs.TWPTableRowStyle | WPRTEReport.TParagraphProperty

Description

The TWPTextStyle is used to store paragraph styles. The TParagraph class also inherits from this class

Properties

Methods

Function _AGetWPAT_Count : Integer

Function _AGetWPAT_GetValue(index:Integer; wpat:Integer; Value:Integer) : Boolean

Function ABorderEqual(OtherStyle:TWPTextStyle; WPBRD_MinFlags:Integer) : Boolean

Function ABorderHash : Integer

Procedure AClear

Procedure AClearCharAttr

Procedure ACopy(Source:TWPTextStyle; FromDef:Byte; ToDef:Byte)

Function ACountAttr : Integer

Procedure ADel(WPAT_Code:Byte)

Procedure ADelAllDefinedIn(Source:TWPTextStyle)

Procedure ADelAllFromTo(WPAT_CodeFrom:Byte; WPAT_CodeTo:Byte)

Procedure ADelAllIn(WPAT_Codes:)

Procedure ADelAttr(par_attr:Boolean; char_attr:Boolean; border_attr:Boolean)

Procedure ADeleteDifferentSettings(Style:TWPTextStyle)

Procedure ADeleteEqualSettings(Style:TWPTextStyle)

Function AGet(WPAT_Code:Byte; Value:Integer) : Boolean

Function AGet_CSS(CharAttr:Boolean; TabAttr:Boolean; CreateCRNL:Boolean; AddBorderProps:Boolean; IgnoreMargins:Boolean; IgnoreIndentFirst:Boolean; basisindent:Integer; WritePXValues:Boolean) : string

Function AGetAllInheritedFlags(WPAT_Code:Byte; Value:Integer) : Boolean

Function AGetAsINI(ValueList:TWPValueList; Options:TWPStyleAsIniOptions) : Integer

Function AGetBorder(Border:TBorder; IsTableBord:Boolean; Init:Boolean; Overwrite:Boolean) : Boolean

Function AGetBorderColor(select:TOneBorderType) : TColor

Function AGetBorderType(select:TOneBorderType) : Integer

Function AGetBorderWidth(select:TOneBorderType) : Integer

Function AGetCharProps(props:TWPCharAttr; UseInherited:Boolean; Overwrite:Boolean) : Boolean

Function AGetCharStyle(WPSTY_Value:Integer) : TThreeState

Function AGetColor(WPAT_Code:Byte) : TColor

Function AGetDef(WPAT_Code:Byte; DefaultValue:Integer) : Integer

Function AGetDefInherited(WPAT_Code:Byte; DefaultValue:Integer) : Integer

Function AGetDefOrStyle(WPAT_Code:Byte; DefaultValue:Integer) : Integer

Function AGetDefStringProp(WPAT_Code:Byte; DefValue:string) : string

Function AGetFlag(WPAT_Code:Integer; Mask:Integer) : TThreeState

Function AGetFlagInherited(WPAT_Code:Integer; Mask:Integer) : TThreeState

Function AGetFontName : string

Function AGetInherited(WPAT_Code:Byte; Value:Integer) : Boolean

Function AGetInheritedSave(WPAT_Code:Byte; Value:Integer; MaxDepth:Integer) : Boolean

Function AGetParKeep(N:Boolean) : Boolean

Function AGetStringProp(WPAT_Code:Byte; Value:string) : Boolean

Function AGetStringPropW(WPAT_Code:Byte; Value:WideString) : Boolean

Function AGetStyleCharAttr(baseca:TWPCharAttr; UseInherited:Boolean; ClearBaseCA:Boolean) : Boolean

Function AGetStylesEx(styles_on:WrtStyle; styles_mask:WrtStyle) : Boolean

Function AGetWPSS(Names:Boolean; TabAttr:Boolean; wpat_codelist:) : AnsiString

Function AHasAttrib(WPAT_Code:Byte) : Boolean

Procedure AIgnoreTemplateProp

Procedure AInc(WPAT_Code:Byte; Offset:Integer; MinValue:Integer)

Function AIsEqual(Style:TWPTextStyle) : Boolean

Procedure AMerge(Source:TWPTextStyle; Overwrite:Boolean)

Procedure ANeedUpdateProps

Function ANumberToAnsiString(Number:Integer) : AnsiString

Function ANumberToString(Number:Integer) : WideString

Function ASet(WPAT_Code:Byte; Value:Integer) : Integer

Function ASet_CSS(CssString:string; Merge:Boolean) : Integer

Procedure ASetAdd(WPAT_Code:Byte; Value:Cardinal)

Procedure ASetAddCharStyle(WPSTY_Value:Integer)

Function ASetAsINI(ValueList:TWPValueList; Options:TWPStyleAsIniOptions; ParentStyleElement:TWPRTFStyleElement) : Integer

Procedure ASetBaseStyle(aStyle:Integer)

Procedure ASetBorder(Border:TBorder)

Procedure ASetBorderFlags(WPBRD_DRAW_Value:Integer)

Procedure ASetCharStyle(BooleanFlag:Boolean; WPSTY_Value:Integer)

Procedure ASetColor(WPAT_Code:Byte; Value:TColor)

Procedure ASetColorString(WPAT_Code:Byte; ColorName:string)

Procedure ASetDel(WPAT_Code:Byte; Value:Cardinal)

Procedure ASetDelCharStyle(WPSTY_Value:Integer)

Procedure ASetFlag(WPAT_Code:Integer; Mask:Integer; Value:TThreeState)

Procedure ASetFontName(FontName:string)

Function ASetFromHTMLTag(WPAT_Code:Byte; tag:TWPCustomHTMLTag; paramname:string) : Boolean

Procedure ASetNeutral(WPAT_Code:Byte; Value:Integer)

Function ASetProp(WPAT_Code:Byte; Value:Integer) : TWPTextStyle

Procedure ASetStringProp(WPAT_Code:Byte; Value:string)

Procedure ASetStringPropW(WPAT_Code:Byte; Value:WideString)

Procedure ASetUndefinedParSettingsToNull(Style:TWPTextStyle; wpat_from:Integer; wpat_to:Integer)

Procedure ASetWPSS(WPCSSString:string; Merge:Boolean; Abbreviated:Boolean; OverrideValues:Boolean)

Procedure Assign(Source:TWPAbstractCharAttrInterface)

Function AStringToNumber(Parameter:WideString) : Integer

Procedure AUpdateProps

Function BackgroundImageLoad(Reader:TWPCustomTextReader; LoadPath:string; url:string) : Boolean

Procedure Clear

Procedure ClearCharAttributes(ClearParAttrToo:Boolean)

Create(props:TWPRTFProps)

Function CreateStyleCopy : TWPTextStyle

Destroy

Procedure Frm_CalcIndent(indentfirst:Integer; indentleft:Integer)

Function GetNumberStyle(numlevel:Integer; SkipNumber:Boolean) : TWPTextStyle

Function GetNumberStyleEle : TWPRTFNumberingStyle

Function GetNumberStyleEx(numlevel:Integer; SkipNumber:Boolean; ele:TWPRTFNumberingStyle) : TWPTextStyle

Procedure Refresh

Function SetNumbering(number_id:Integer; numlevel:Integer; ApplyWithIndents:Boolean) : Boolean

Function SetNumberLevel(level:Integer; indent:Integer) : TWPTextStyle

Procedure SetRTFProps(props:TWPRTFProps)

Procedure SetStyle(ParStyleNr:Integer; ClearParStyles:Boolean; ClearCharStyles:Boolean)

Function TabstopAdd(Value:Integer; Kind:TTabKind; Fill:TTabFill; ColorNr:Integer) : Boolean

Procedure TabstopAddRightMost(Fill:TTabFill)

Procedure TabstopAssign(Source:TWPTextStyle)

Procedure TabstopClear

Function TabstopCount : Integer

Function TabstopDelete(Value:Integer) : Boolean

Function TabstopEqual(Style:TWPTextStyle) : Boolean

Function TabstopFind(Value:Integer) : Integer

Procedure TabstopGet(nr:Integer; Value:Integer; Kind:TTabKind; FillMode:TTabFill; FillColor:Integer)

Function TabstopGetFirstPos : Integer

Function TabstopGetNext(AfterVal:Integer; UntilVal:Integer; Value:Integer; Kind:TTabKind; DefaultTabstopValue:Integer) : Integer

Function TabstopGetPrev(BeforeVal:Integer; Value:Integer; Kind:TTabKind; DefaultTabstopValue:Integer) : Integer

Procedure TabstopMove(OldValue:Integer; NewValue:Integer)

Function TabstopSet(Value:Integer; Flags:Cardinal) : Boolean

Function TabStopSort : Integer

Function TextAreaWidth : Integer

Events

OnTextStyleGetParent : TWPTextStyleGetParentEvent= TWPTextStyleGetParentEvent

This event can be assigned to a TParagraph or TWPTextStyle instance to read the property value which should be used when a certain propetrty was not found in the current style. This event has priority of any attached styles (ABaseStyle) and in fact allows merging of properties defined in multiple text style objects.
The event is called recursevly, this means if the property was not found in the provided ParentStyle the event assigned to the parent style will be executed.
The property wpat code is provided to allow pre selection.
This event was added in WPTools V6.

Used or referenced by

-Procedure TWPCustomRuler.UpdateFrom(Source:TWPRTFDataCollection; Control:TControl; par:TWPTextStyle)