HotXLS 文件

AddTextBox 方法

透過基於 1 的工作表錨點加入經典 XLS 繪圖文字方塊,並返回建立的 TXLSTextBox 物件

語法

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;
    

另請參閱

TXLSWorksheet 類別
TXLSWorksheet.Shapes 屬性
TXLSShapes.AddTextBox 方法
TXLSTextBox 類別