! tacdlg.def [100] - symbols & structures used by TACDLG.SBX !------------------------------------------------------------------------ !EDIT HISTORY ! [101] 25-Apr-18 / jdm / add ST_TACINF ! [100] 20-Apr-18 / jdm / created !------------------------------------------------------------------------ !REQUIREMENTS ! !NOTES !------------------------------------------------------------------------ define TDF_BTNOK = &h0001 ! add an ok button (exitcode 0) define TDF_BTNCANCEL = &h0002 ! add an ok button (exitcode 1) define TDF_BTNHELP = &h0004 ! add a help button (exitcode -1) define TDF_BTNPREV = &h0008 ! add a previous field button (exitcode -2) define TDF_KBDNUM = &h0010 ! attach a numeric keypad define TDF_UPDOWN = &h0020 ! add up/down buttons defstruct ST_TACINF ! attributes of an input field map2 IDX,B,4 ! exitcode = -(200+IDX) map2 LABEL$,s,40 map2 ROW,b,4 map2 COL,b,4 map2 XMAX,b,4 map2 XMIN,b,4 map2 TYPE$,s,80 ! INFLD type codes map2 SGATYPE$,s,20 ! SGA type names map2 PARENTID$,s,24 map2 DEFPT,i,2 map2 MAXPT,i,2 map2 MINVAL,f map2 MAXVAL,f map2 MAXCHARS,b,2 map2 TOOLTIP$,s,120 map2 SETDEF$,S,240 map2 FORM$,s,20 ! for INFLD f form fields endstruct