Додає класичне текстове поле малювання XLS за точками прив'язки робочого аркуша на основі 1 і повертає створений об'єкт
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;
Див. також