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;
참고 항목