Определяне на края на файла
EOF стойност функция може да се провери веднага след отваряне на файла. Ако това е, за да бъде равна на True, което означава, че файлът не съдържа никакъв елемент от данни, т.е.. Д. Той е празен (размерът на файла е нула).
Обявата 7.5 показва процедурата, която изпълнява задачата. Той гласи линии от файл, чието име е потребителят е въвел по време на програмата и показва тези редове в областта на Memo. Прозорецът на програмата е показана на фиг. 7.6.
Фиг. 7.6. Прозорецът на програма за четене от файл
и Обявата 7.5. Четене от файл
процедура Button2Click (Sender: TObject); процедура ButtonlClick (Sender: TObject); частен
Var Forml: TForml; изпълнение
процедура TForml.ButtonlClick (Sender: TObject); Var е: текстов файл; // файл
fName: String [80]; // име
Buf: String [80]; // буфер, за да се чете от файла
// прочетени от файла, а не EOF (е) да започне readln (е, Buf); // чете ред от файл
F: текстов файл; // файл
Препишете (е); // отворена за презаписване // пиша във файла
CloseFile (е); // затворете файла
За организацията използва файл инструкция за обработка цикъл време, което осигурява тестови стойности EOF функция преди всяко четене, включително и преди първата.
Типове данни, дефинирани от програмиста
До този момент в програмите, използващи стандартни типове данни: число, Реал, Char, низ и Булева. Въпреки това, Паскал език позволява на програмиста да определите своя тип данни, а след това данните от вида, използвани в програмата.
Програмист декларира нов тип данни са базирани на стандартните видове или видове, създадени по-рано от програмист. Вид определя от програмиста, той може да се дължи на:
композитен тип данни (запис).