Source position: xforms.pp line 2176
procedure fl_show_alert(
p1: pchar;
p2: pchar;
p3: pchar;
p4: LongInt
);