מוסיף תיבת טקסט של ציור קלאסי של 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;
ראה גם