Vcl.Dialogs.TPageSetupBeforePaintEvent
Delphi
TPageSetupBeforePaintEvent = procedure (Sender: TObject; const PaperSize: SmallInt;
const Orientation: TPrinterOrientation; const PageType: TPageType;
var DoneDrawing: Boolean) of object;
C++
typedef void __fastcall (__closure *TPageSetupBeforePaintEvent)(System::TObject* Sender, const short PaperSize, const System::Uitypes::TPrinterOrientation Orientation, const System::Uitypes::TPageType PageType, bool &DoneDrawing);
Properties
Type | Visibility | Source | Unit | Parent |
---|---|---|---|---|
type typedef |
public | Vcl.Dialogs.pas Vcl.Dialogs.hpp |
Vcl.Dialogs | Vcl.Dialogs |
Description
TPageSetupBeforePaintEvent defines the class method called by the BeforePaint event.
The BeforePaint event occurs before dialog draws sample page. Write a BeforePaint event handler to initialize data used by the other event handlers.
PaperSize indicates a standard Windows paper size. See Paper size constants.
Orientation indicates the paper orientation currently selected.
PageType indicates the kind of paper currently selected.
Set DoneDrawing to true to disable further painting. This results in a blank sample page, with none of the other event handlers being called.