在新工作表加入活頁簿後發生
語法
TAfterNewSheet =
procedure(Sender: TObject; Worksheet:
TXLSWorksheet) of object;
語法
TAfterNewSheet =
procedure(Sender: TObject; Worksheet:
TXLSWorksheet) of object;
| Sender |
TObject. 指定 TDataToXLS 元件 triggered 事件 |
| Worksheet |
TXLSWorksheet，代表新的 Worksheet |
範例
This example sets the PageSetup options for created Worksheet
procedure TForm1.DataToXLS1AfterNewSheet(Sender: TObject;
Worksheet: TXLSWorksheet);
begin
Worksheet.PageSetup.CenterHeader := 'Monthly report';
end;