property OnFormCursor: TPdfFormCursorEvent read FOnFormCursor write FOnFormCursor;
OnFormCursor는 대화형 폼 레이어가 어떤 커서를 보여줄지 물을 때 발생합니다. 핸들러는 TPdfFormCursor 타입의 디코딩된 Cursor(pfcUnknown, pfcArrow, pfcSizeNESW, pfcSizeNWSE, pfcVerticalBeam, pfcHorizontalBeam, pfcHand), 원시 NativeCursorType 코드, var Handled 플래그를 받습니다
Handled = True로 설정하면 호스트 고유의 커서를 적용합니다. 핸들러가 할당되지 않았거나 Handled가 False로 남으면 컴포넌트가 디코딩된 값을 맞는 VCL 커서로 매핑합니다
procedure(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean) of objectFormHostCallbacksComplete를 확인하세요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;