IdxRichEditTableBorders.Bottom Property
In This Article
Provides access to the appearance settings of the external bottom table border.
#Declaration
Delphi
property Bottom: IdxRichEditTableBorder read;
#Property Value
Type | Description |
---|---|
Idx |
Exposes table border appearance settings. |
#Remarks
You can use Bottom
, Left, Right, and Top properties to independently configure corresponding external table borders.
#Available Options
Use Bottom
.LineColor, Bottom
.LineStyle, and Bottom
.LineThickness properties to change the appearance of the external bottom table border.
#Code Example: Create and Customize a Table
The following code example creates a table populated with three columns and rows at the current caret position and customizes the table’s borders and background:
uses
dxCoreGraphics; // This unit declares TdxAlphaColor and TdxAlphaColors types
// ...
var
ADocument: IdxRichEditDocument;
ATable: IdxRichEditTable;
I, J: Integer;
begin
ADocument := dxRichEditControl1.Document;
ADocument.BeginUpdate; // Initiates the following batch change
try
ATable := ADocument.Tables.Add(ADocument.CaretPosition, 3, 3);
for I := 0 to ATable.Rows.Count - 1 do
for J := 0 to ATable.Rows.Self[I].Cells.Count - 1 do
ADocument.InsertText(ATable.Cell(I, J).Range.Start, 'Lorem ipsum dolor sit amet');
ATable.Borders.InsideHorizontalBorder.LineStyle := TdxRichEditTableBorderLineStyle.DotDotDash;
ATable.Borders.InsideHorizontalBorder.LineColor := TdxAlphaColors.Firebrick;
ATable.Borders.InsideVerticalBorder.LineStyle := TdxRichEditTableBorderLineStyle.Dotted;
ATable.Borders.Bottom.LineStyle := TdxRichEditTableBorderLineStyle.ThinThickMediumGap;
ATable.Borders.Bottom.LineThickness := 1.5;
ATable.Borders.Bottom.LineColor := TdxAlphaColors.Red;
ATable.Borders.Left.LineStyle := TdxRichEditTableBorderLineStyle.ThinThickMediumGap;
ATable.Borders.Left.LineColor := TdxAlphaColors.Red;
ATable.Borders.Left.LineThickness := 1.5;
ATable.Borders.Right.LineStyle := TdxRichEditTableBorderLineStyle.ThinThickMediumGap;
ATable.Borders.Right.LineColor := TdxAlphaColors.Red;
ATable.Borders.Right.LineThickness := 1.5;
ATable.Borders.Top.LineStyle := TdxRichEditTableBorderLineStyle.ThinThickMediumGap;
ATable.Borders.Top.LineColor := TdxAlphaColors.Red;
ATable.Borders.Top.LineThickness := 1.5;
ATable.TableBackgroundColor := TdxAlphaColors.LightSalmon;
finally
ADocument.EndUpdate; // Calls EndUpdate regardless of the batch operation's success
end;
end;
See Also