Texas Instruments TI89 Developer Guide - Page 1069
DlgNotice BAD NAME OR FOLDER NOT FOUND, char * szBuf, XFLAGS
![]() |
UPC - 033317198566
View all Texas Instruments TI89 manuals
Add to My Manuals
Save this manual to your list of manuals |
Page 1069 highlights
Appendix A: System Routines - Symbol Table Utilities 1027 push_setfold (continued) Example: (continued) /* Prompt the user for a folder name and set that to the current default folder. If the user enters nothing or an invalid name, reprompt this time with the current folder. Return TRUE if valid name entered, FALSE otherwise. */ { BYTE szBuf[SYM_LEN+2], *ptr; EStackIndex oldTop = top_estack; memset( szBuf, 0, SYM_LEN+1 ); redo: TRY if (KB_ENTER == Dialog( &dGetFold,-1,-1, (char *) szBuf, NULL)) { ptr = FirstNonblank((BYTE *) szBuf); if (*ptr == '\0') { redo2: push_getfold(); /* Pushed on estack: 0, cur_fold, 0, STR_DATA_TAG. So we start at the last char of cur_fold and find the starting char (going from high to low memory) */ ptr = top_estack - 2; while (*ptr) ptr--; strcpy( (char *) szBuf, (char *) ptr+1 ); goto redo; } if (TokenizeSymName( (BYTE *) szBuf,0)) { TRY push_setfold( top_estack ); ONERR goto redo3; ENDTRY DlgNotice( "FOLDER CHANGED TO", (char *) szBuf ); top_estack = oldTop; return(TRUE); } redo3: DlgNotice( "BAD NAME OR FOLDER NOT FOUND", (char *) szBuf ); goto redo2; } ONERR ENDTRY top_estack = oldTop; return(FALSE); } DIALOG dGetFold, 0, 0, NoCallBack { EDIT, {0, 8, 15}, XR_FolderC, 0, 8, 9 HEADER, {0, 0, 0}, "SET FOLDER", PDB_OK, PDB_CANCEL XFLAGS, {0, 0, 0}, XF_ALLOW_VARLINK | XF_VARLINK_SELECT_ONLY, 0, 0, 0 } TI-89 / TI-92 Plus Developer Guide Not for Distribution Beta Version January 26, 2001
![](/manual_guide/products/texas-instruments-ti89-developer-guide-95b636f/1069.png)