Source position: gtkentry.inc line 122
function in_drag(
var a: TGtkEntry
):guint; overload;function in_drag(
var a: TGtkHandleBox
var a: TGtkPaned
):guint; overload;