Sub-function 7 of appl_getinfo() returns in the lowest 5 bits of ap_gout1 whether the wdlg/lbox/fnts/fslx/pdlg_xx() functions are present.
Declaration: WORD appl_getinfo( WORD ap_gtype, WORD *ap_gout1, WORD *ap_gout2, WORD *ap_gout3, WORD *ap_gout4 ); Call: ap_greturn = appl_getinfo( 7, &ap_gout1, &ap_gout2, &ap_gout3, &ap_gout4 ); Variable Argument Meaning Inputs: contrl[0] 130 appl_getinfo contrl[1] 1 Entries in intin contrl[3] 0 Entries in addrin intin[0] ap_gtype Number of the sub-function (7) Outputs: contrl[2] 5 Entries in intout contrl[4] 0 Entries in addrout intout[0] ap_greturn 0: Error 1: All OK intout[1] ap_gout1 See description intout[2] ap_gout2 intout[3] ap_gout3 intout[4] ap_gout4 Bits in ap_gout1: Bit 0: wdlg_xx()-functions are present (1) Bit 1: lbox_xx()-functions are present (1) Bit 2: fnts_xx()-functions are present (1) Bit 3: fslx_xx()-functions are present (1) * Bit 4: pdlg_xx()-functions are present (1) *: fslx_xx()-functions are only made available by MagiC. With TOS + WDIALOG the bit is not set. For a description of the file selector see fslx.txt (part of the MagiC docs).
Note: The function appl_getinfo() is not present in all AES versions. To check that it is present you should call appl_find("?AGI"). If appl_find() does not return an error then appl_getinfo() is present. This procedure also works with old TOS versions, as WDIALOG makes a rudimentary appl_getinfo()-function available and intercepts appl_find().
From V1.06 onwards WDIALOG also supplies the form_popup()-function of MagiC in old TOS versions.