HotXLS Docs

AfterNewSheet 事件

在新工作表添加到工作簿之后发生

说明

您可以使用此事件为创建的工作表设置任何附加选项

语法

TAfterNewSheet = procedure(Sender: TObject; Worksheet: TXLSWorksheet) of object;
Sender TObject。指定触发该事件的 TDataToXLS 组件
Worksheet TXLSWorksheet,表示一个新工作表

示例

此示例为创建的工作表设置 PageSetup 选项

procedure TForm1.DataToXLS1AfterNewSheet(Sender: TObject;
  Worksheet: TXLSWorksheet);
begin
  Worksheet.PageSetup.CenterHeader := 'Monthly report';
end;