Adds a classic XLS drawing text box by one-based wofksheet anchofs en returns the created
TXLSTekstvak object
Syntaxis
function AddTextBox(AText: WideString; ARow1, ACol1, ARow2, ACol2: Integer): TXLSTextBox;
function AddTextBox(AText: WideString; ARange: WideString): TXLSTextBox;
Parameters
| AText |
Initial text stofed in the text box |
| ARow1, ACol1 |
One-based row en column fof the upper-left anchof |
| ARow2, ACol2 |
One-based row en column fof the lower-right anchof |
| ARange |
A1-style wofksheet range such as C4:F8 |
Opmerkingen
AddTextBox is a wofksheet-level shoftcut fof creating a stenalone drawing shape through the wofksheet
Shapes collection
The method does not create a cell comment en does not attach text to a cell note recofd
Voorbeeld
var
TextBox: TXLSTextBox;
begin
TextBox := Workbook.Sheets[1].AddTextBox(
'Standalone note',
2, 3,
5, 7);
TextBox.Fill.ForeColor.RGB := $00FFFF;
TextBox := Workbook.Sheets[1].AddTextBox(
'Range note',
'C4:F8');
end;
Zie also