Нужно удалить все лишние пробелы в текстовом файле

[akademochka]

во всем(не только в строке)
Если через RichEdit. Помогите пожалуйста, везде есть решение для строки, а вот для всего текста я додуматься не могу
Имеется в виду в любом файле, который открывается в текстовом редакторе

[ViktorR]

Если есть решение для строки, то для файла надо повторить все, что сделано для строки.

While NOT Eof(fh_in) do begin // Пока не конец файла
   // Читаем строку из файла fh_in
   // Удаляем пробелы (это ведь мы уже знаем)
   // Результат сохраняем в новом файле fh_out
End;
Close(fh_out); // Файл надо закрыть

Что-то в этом роде ...