מתרחש לאחר שגליון עבודה חדש נוסף לחוברת העבודה
תיאור
ניתן להשתמש באירוע זה להגדרת אפשרויות נוספות לגליון העבודה שנוצר
תחביר
TOnDBGridCreateWorksheet =
procedure(Sender: TObject; Worksheet:
TXLSWorksheet) of object;
| Sender |
TObject. מציין the TGridToXLS component that triggered the אירוע |
| Worksheet |
TXLSWorksheet which represents a new Worksheet |
דוגמה
דוגמה זו מגדירה את אפשרויות PageSetup עבור גליון העבודה שנוצר
procedure TForm1.GridToXLS1AfterNewSheet(Sender: TObject;
Worksheet: TXLSWorksheet);
begin
Worksheet.PageSetup.CenterHeader := 'Monthly report';
end;