Source position: gtkhandlebox.inc line 77
procedure set_shrink_on_detach(
var a: TGtkHandleBox;
__shrink_on_detach: guint
);