<κλάση header="doc-nav" aria-label="Πλοήγηση τεκμηρίωσης">Τεκμηρίωση HotXLS<κλάση nav="doc-links">ΠεριεχόμεναXLSX Facade<κλάση div="nav topic-quick-nav" aria-label="Topic shortcuts">ΑρχικήΠεριεχόμεναTXLSXCell
TXLSXRichText and TXLSXRichTextRun classes
<κλάση div="indent"><κλάση div="txt">TXLSXRichText stores styled text runs for TXLSXCell.RichText and comment rich text in the XLSX façade
Declarations
<κλάση pre="code">type
TXLSXRichText = class
function AddRun: TXLSXRichTextRun;
function AddRunText(const AText: WideString): TXLSXRichTextRun;
procedure Clear;
function PlainText: WideString;
property RunCount: Integer;
property Runs[Index: Integer]: TXLSXRichTextRun;
end;
TXLSXRichTextRun = class
property Text, Name: WideString;
property Size: Double;
property Bold, Italic, Strikethrough, ColorIsAuto: Boolean;
property Underline: TXLSXUnderline;
property Color: LongWord;
property VertAlign: TXLSXFontVertAlign;
end;
Key μέλη
<κλάση table="synd"><κλάση td="syni">AddRun and AddRunText<κλάση td="synid">Append an empty run or a run with initial text
<κλάση td="syni">PlainText<κλάση td="synid">Επιστρέφει the concatenated text without style information
<κλάση td="syni">Name, Size, Bold, Italic and Strikethrough<κλάση td="synid">Font family, size and basic style attributes for one run
<κλάση td="syni">Underline, Color and ColorIsAuto<κλάση td="synid">Underline and colour choices for the run
<κλάση td="syni">VertAlign<κλάση td="synid">Baseline, subscript or superscript vertical alignment
Παράδειγμα
<κλάση pre="code">var Rich: TXLSXRichText;
begin
Rich := TXLSXRichText.Create;
Rich.AddRunText('Quarterly ');
Rich.AddRunText('Report').Bold := True;
Sheet.Cells[1, 1].RichText := Rich;
end;Δείτε επίσης
<κλάση footer="reference-footer">Copyright © 2010-2026 losLab Software