TFontInfo.Assign

<< Click to display table of contents >>

TFontInfo.Assign

Copies the contents of Source to this text style.

procedure Assign(Source: TPersistent); override

Call Assign to copy properties of TFont, TCustomRVInfo, TCustomRVFontInfo, or TFontInfo to this text style.

Example:

// Copying TFont to text style:

MyRVStyle.TextStyles[0].Assign(MyEdit.Font);

 

// Copying text style to text style:

MyRVStyle.TextStyles[0].Assign(MyRVStyle.TextStyles[1]);

// or, the same:

MyRVStyle.TextStyles[0] := MyRVStyle.TextStyles[1];