property OnFormCursor: TPdfFormCursorEvent read FOnFormCursor write FOnFormCursor;
OnFormCursor, etkileşimli form katmanı hangi imlecin gösterileceğini sorduğunda tetiklenir. İşleyici; TPdfFormCursor türünden çözümlenmiş Cursor değeri (pfcUnknown, pfcArrow, pfcSizeNESW, pfcSizeNWSE, pfcVerticalBeam, pfcHorizontalBeam, pfcHand), ham NativeCursorType kodu ve bir var Handled bayrağı alır
Ana makineye özgü bir imleç uygulamak için Handled = True yapın; işleyici atanmamışken ya da Handled False kalırken bileşen, çözümlenmiş değeri karşılık gelen VCL imlecine eşler
procedure(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean) of objectFormHostCallbacksComplete değerini denetleyinprocedure TMain.Pdf1FormCursor(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean);
begin
if Cursor= pfcVerticalBeam then begin
Screen.Cursor := crIBeam;
Handled := True;
end;
end;