Source position: xinput.pp line 812
procedure DeviceFocusIn(
d: PXDevice;
out event_type: cint;
out event_class: TXEventClass
);