property OnFormCursor: TPdfFormCursorEvent read FOnFormCursor write FOnFormCursor;
OnFormCursor se activa cuando la capa de formularios interactivos pregunta qué cursor mostrar. El manejador recibe el Cursor decodificado de tipo TPdfFormCursor (pfcUnknown, pfcArrow, pfcSizeNESW, pfcSizeNWSE, pfcVerticalBeam, pfcHorizontalBeam, pfcHand), el código NativeCursorType en bruto y una bandera var Handled
Establezca Handled = True para aplicar un cursor específico del host; cuando no hay ningún manejador asignado o Handled permanece en False, el componente asigna el valor decodificado al cursor VCL correspondiente
procedure(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean) of objectFormHostCallbacksComplete cuando el evento nunca se activaprocedure TMain.Pdf1FormCursor(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean);
begin
if Cursor= pfcVerticalBeam then begin
Screen.Cursor := crIBeam;
Handled := True;
end;
end;