OnFormCursor event

Component: TPdf · Unit: PDFium

Treedt op wanneer de formulierlaag een cursormodel vraagt voor het veld onder de aanwijzer

Syntax

property OnFormCursor: TPdfFormCursorEvent read FOnFormCursor write FOnFormCursor;

Description

OnFormCursor treedt op wanneer de interactieve formulierlaag vraagt welke cursor moet worden getoond. De handler ontvangt de gedecodeerde Cursor van het type TPdfFormCursor (pfcUnknown, pfcArrow, pfcSizeNESW, pfcSizeNWSE, pfcVerticalBeam, pfcHorizontalBeam, pfcHand), de ruwe code NativeCursorType en een vlag var Handled

Zet Handled = True om een door de host bepaalde cursor toe te passen; wanneer geen handler is toegewezen of Handled op False blijft, vertaalt de component de gedecodeerde waarde naar de bijbehorende VCL-cursor

Remarks

Handtekening van de handler: procedure(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean) of object
Vereist dat de form host callbacks volledig zijn; controleer FormHostCallbacksComplete wanneer het event nooit optreedt

Example

procedure TMain.Pdf1FormCursor(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean);
begin
  if Cursor= pfcVerticalBeam then begin
    Screen.Cursor := crIBeam;
    Handled := True;
  end;
end;