Developing.ru

так и не выяснили какой компилятор используется

а можно поинтересоваться, почему вместо модуля Dos (uses Dos) Вы пытаетесь использовать модуль WinDos ?
ну, если это реально надо (хотя думаю, что это у Вас от незнания...), тогда
опишите строчку path как path : string;
а метод вызывайте как FindFirst(Pchar(path), faArchive, DirInfo);

Удачи.

&quot писал(а):так и не выяснили какой компилятор используется

+1
хотя, я на 99.9% уверен, что это TP 7.0 или BP 7.0

вот мне интересно... похоже, что автор топика либо не читает ответы, либо не хочет понимать их... ;-(
1) код, который кинул demon416, рабочий (на Delphi)!
2) мой код я проверил в TP 7.0 - работает...
что ищет Олег, чего он добивается... не понимаю... ;-(

Пожалуйста помогите очень нужно!!!!!!!!!Написать программу на Paskal, которая вычисляет среднюю длину слов в файле, который содержит текст.В данном случае будет считатьтся любая строка символов, которая начинается и заканчивается одним с следующих елеметов: пробел, запятая, точка, начало строки и конец строки.В программе должна быть обозначена функция, которая получает в качестве аргумента поток ввода с файла.