Source position: xinput.pp line 968
function XGetDeviceFocus(
display: PDisplay;
device: PXDevice;
focus: PWindow;
revert_to: Pcint;
time: PTime
):cint;