pex14_8.cpp

数据结构C++代码,经典代码,受益多多,希望大家多多支持

#include <iostream.h>
#include <ctype.h>
#pragma hdrstop

#include "ptf.h"

// for the n characters in s, translate each
// lowercase character to uppercase.
void UpperCase(char *s, int n)
{
	while(n--)
	{
		if (islower(*s))
			*s = toupper(*s);
		s++;
	}
}

void main(void)
{
	PascalTextFile  pfin, pfout;
	char buffer[128];
	int nchars;

	// read from file "ptf.h"
	pfin.Assign("ptf.h");
	pfin.Reset();
	
	// write to file "ptf.uc"
	pfout.Assign("ptf.uc");
	pfout.Rewrite();

	// read "ptf.h", translate each lowercase character to
	// upper case and write the modified characters to file "ptf.uc" 
	while(!pfin.EndFile())
	{
		// read up to 128 characters from pfin. assign the number
		// actually read to nchars
		nchars = pfin.PRead(buffer,128);
		// if we are at end of file, break and exit
		/*if (pfin.EndFile())
			break;*/
		// translate each lowercase character in buffer
		// to upper case
		UpperCase(buffer,nchars);
		// write nchars characters to pfout
		pfout.PWrite(buffer,nchars);
	}
	
	// close the two files
	pfin.Close();
	pfout.Close();
}

/*
<Run>
No run. List the file "ptf.uc".
*/