Source position: gtkhandlebox.pp line 44
procedure set_in_drag(
var a: TGtkHandleBox;
__in_drag: guint
);procedure set_in_drag(
var a: TGtkPaned;
);