Source position: xforms.pp line 2183
procedure fl_set_choices_shortcut(
p1: pchar;
p2: pchar;
p3: pchar
);