Texas Instruments TI89 Developer Guide - Page 1087
if hFolderPopup = VarCreateFolderPopup&VL_ViewOpts[VLO_FOLDER], VCFP_ALL
UPC - 033317198566
View all Texas Instruments TI89 manuals
Add to My Manuals
Save this manual to your list of manuals |
Page 1087 highlights
Appendix A: System Routines - Symbol Table Utilities 1045 VarCreateFolderPopup (continued) VL_ViewOpts[VLO_FOLDER] = 1; if ((hFolderPopup = VarCreateFolderPopup(&VL_ViewOpts[VLO_FOLDER], VCFP_ALL)) != H_NULL) { if (hViewPopup = PopupNew(NULL, 0)) { PopupAddText(hViewPopup,-1,XR_stringPtr(XR_Vars), VL_VIEW_VARS ); PopupAddText(hViewPopup,-1,XR_stringPtr(XR_vtFlashApp), VL_VIEW_APPS ); PopupAddText(hViewPopup,-1,XR_stringPtr(XR_vtSystem), VL_VIEW_SYS ); if (MenuFlags(hViewPopup) & MF_ERROR) goto VM1; } else goto VM1; wVal = Dialog(&VarLinkView, -1, -1, NULL, VL_ViewOpts); if (wVal == KB_ENTER) { if (VL_VIEW_SYS == VL_ViewOpts[VLO_VIEW]) SymFindType = SDT_SYS; else if (VL_VIEW_APPS == VL_ViewOpts[VLO_VIEW]) SymFindType = SDT_APP; else { SymFindType = VL_ViewOpts[VLO_VARTYPE] - 1; strcpy( (char *) szVLfolder+1, (char *) PopupText( hFolderPopup, VL_ViewOpts[VLO_FOLDER]) ); if (strcmp((char *) szVLfolder+1, XR_stringPtr(XR_All)) == 0) SymFindFlags = FO_RECURSE | FO_CKTWINS; else SymFindFlags = FO_NONE | FO_CKTWINS; szVLfolder[0] = '\0'; } } else if (wVal == DB_MEMFULL) goto VM1; } else VM1: ERD_dialog( ER_MEMORY, FALSE ); if (hFolderPopup) PopupFree(hFolderPopup); if (hViewPopup) PopupFree(hViewPopup); } TI-89 / TI-92 Plus Developer Guide Not for Distribution Beta Version January 26, 2001