Appendix A: System Routines — Files
569
TI
-
89 / TI
-
92 Plus Developer Guide
Not for Distribution
Beta Version January 26, 2001
FOpen
(continued)
Example:
BOOL LocAppViewer( AppID appID, BYTE *type, WINDOW *w, HSYM hSym )
{ char fName[MAX_SYM_LEN];
FILES f1;
WORD c;
WinFont( w, F_8x10 );
if (0 == stricmp((char *) type,"APP1")) {
if (HSYMtoName( hSym, (BYTE *) fName )) {
if (FS_OK == FOpen(fName, &f1, FM_READ, "APP1" )) {
while (!FEof(&f1)) {
c = FGetC(&f1);
WinChar( w, c );
}
}
}
return TRUE;
}
}