Xảy ra sau khi Trang tính mới được thêm vào Sổ làm việc
Mô tả
Bạn có thể dùng sự kiện này để đặt bất kỳ tùy chọn bổ sung nào cho Trang tính đã tạo
Cú pháp
TAfterNewSheet =
procedure(Sender: TObject; Worksheet:
TXLSWorksheet) of object;
| Sender |
TObject. Chỉ định thành phần TDataToXLS đã kích hoạt sự kiện |
| Worksheet |
TXLSWorksheet đại diện cho một Worksheet mới |
Ví dụ
Ví dụ này đặt các tùy chọn PageSetup cho Trang tính đã tạo
procedure TForm1.DataToXLS1AfterNewSheet(Sender: TObject;
Worksheet: TXLSWorksheet);
begin
Worksheet.PageSetup.CenterHeader := 'Monthly report';
end;