語法
function AddTextBox(AText: WideString; ARow1, ACol1, ARow2, ACol2: Integer): TXLSTextBox;
function AddTextBox(AText: WideString; ARange: WideString): TXLSTextBox;
參數
| AText |
儲存在文字方塊中的初始文字 |
| ARow1, ACol1 |
基於 1 的左上角錨點列號和欄號 |
| ARow2, ACol2 |
基於 1 的右下角錨點列號和欄號 |
| ARange |
A1 樣式工作表範圍,例如 C4:F8 |
說明
AddTextBox 是工作表層級的捷徑方法,用於透過工作表的
Shapes 集合建立獨立的繪圖形狀
該方法不建立儲存格註解,也不將文字附加到儲存格備註記錄中
範例
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;
另請參閱