Нерабочая процедура

[puporev]

Господи! Ну где Вы видели файлы без расширения? Если Вы называете текстовый файл spis1, то это не значит, что у него нет расширения. Он автоматически сохраняется с расширением *.txt. В название файла расширение писать не надо. Имя файла, это не его название, а название+расширение. Поэтому в программе нужно писать assign(kf,'spis1.txt');, если конечно он текстовый. У вас скорее типизированный, поэтому расширение пишете при создании файла, например *.dat, потом с этим расширением и вызывайте.

[Foky]

Сообщение от puporev

Господи! Ну где Вы видели файлы без расширения? Если Вы называете текстовый файл spis1, то это не значит, что у него нет расширения. Он автоматически сохраняется с расширением *.txt. В название файла расширение писать не надо. Имя файла, это не его название, а название+расширение. Поэтому в программе нужно писать assign(kf,'spis1.txt');, если конечно он текстовый. У вас скорее типизированный, поэтому расширение пишете при создании файла, например *.dat, потом с этим расширением и вызывайте.

Не надо меня, пожалуйста, опускать ниже плинтуса. После названия файла расширения никакого у меня нет! Поэтому я его и не указываю, потому что указывать нечего. Там где тип файла ничего нет, а имя spis1.

[puporev]

Ну, Вам виднее конечно, но я бы на Вашем месте не горячился, а посмотрел бы книжку или другие программы с файлами и не стал бы открывать Америку и смешить народ.

[Serge_Bliznykov]

puporev, коллега, Foky прав. Получить файл без расширения легче лёгкого. Даже в Проводнике Виндоуз, не говоря уже про файловые менеджеры (Типа FAR Commander) или, тем более, с помощью собственной программы... ;-)

[Foky]

Сообщение от puporev

Ну, Вам виднее конечно, но я бы на Вашем месте не горячился, а посмотрел бы книжку или другие программы с файлами и не стал бы открывать Америку и смешить народ.

А я не шут, чтобы Вас смешить. Другие процедуры(чтение из файла, запись) работают с именем этого файла корректно.