Source position: xforms.pp line 734
procedure fl_set_form_hotspot(
p1: PFL_FORM;
p2: TFL_Coord;
p3: TFL_Coord
);