Source position: gdkmain.pp line 106
procedure gdk_drag_status(
context: PGdkDragContext;
action: TGdkDragAction;
time: guint32
);