OnFormCursor Zdarzenie

Component: TPdf · Unit: PDFium

Występuje, gdy warstwa formularzy zażąda kształtu kursora dla pola pod wskaźnikiem

Syntax

property OnFormCursor: TPdfFormCursorEvent read FOnFormCursor write FOnFormCursor;

Description

OnFormCursor występuje, gdy interaktywna warstwa formularzy pyta, jaki kursor ma zostać pokazany. Procedura obsługi otrzymuje zdekodowany Cursor typu TPdfFormCursor (pfcUnknown, pfcArrow, pfcSizeNESW, pfcSizeNWSE, pfcVerticalBeam, pfcHorizontalBeam, pfcHand), surowy kod NativeCursorType oraz flagę var Handled

Ustaw Handled = True, aby zastosować kursor właściwy dla hosta; gdy procedura obsługi nie jest przypisana albo Handled pozostaje False, komponent mapuje zdekodowaną wartość na pasujący kursor VCL

Remarks

Sygnatura procedury obsługi: procedure(Sender: TObject; Cursor: TPdfFormCursor; NativeCursorType: Integer; var Handled: Boolean) of object
Wymaga kompletnych wywołań zwrotnych hosta formularzy; sprawdź FormHostCallbacksComplete, gdy zdarzenie nigdy nie występuje

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;