Source position: gdkevents.inc line 485
procedure gdk_event_set_screen(
event: PGdkEvent;
screen: PGdkScreen
);