Source position: xforms.pp line 771
procedure fl_set_object_gravity(
p1: PFL_OBJECT;
p2: Word;
p3: Word
);