Source position: orca_scene3d.pas line 946
type TD3MouseWheelEvent = procedure(
Sender: TObject;
Shift: TShiftState;
WheelDelta: Integer;
MousePos: TD3Point;
var Handled: Boolean
) of object;