Source position: xforms.pp line 1326
function fl_add_event_callback(
p1: TWindow;
p2: LongInt;
p3: PFL_APPEVENT_CB;
p4: pointer
):PFL_APPEVENT_CB;