1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.

Txt 2 doc

Тема в разделе "Софт", создана пользователем Гадский Поттер, 12.10.05.

  1. Гадский Поттер

    Гадский Поттер Читатель

    5.138
    0
    нужно из текстового файла быстенько убрать лишние знаки конца строки. чем? помню что что-то такое у меня было...
     
  2. AlTk

    AlTk Читатель

    10.699
    0
    как нынче лишний конец строки от не лишнего отличается?
     
  3. Гадский Поттер

    Гадский Поттер Читатель

    5.138
    0
    перед "нелишним" стоят пробелы, изображая "красную строку"
     
  4. AlTk

    AlTk Читатель

    10.699
    0
    Гадский Поттер, наверное все-таки после.

    ну как-то вот так наверное:
    (перед выполнением необходимо удалить все двойные пробелы)

    F1= fileopen
    F2 = fileopen
    While not eof(f1) do begin
    Ch1 = read( f1)
    If ch1 = перевод строки
    then
    Begin
    ch2 = read (f1)
    if ch2 <> пробел
    then ch1=ch2
    write (f2, пробел)
    end
    write(f2, ch1)
     
  5. Гадский Поттер

    Гадский Поттер Читатель

    5.138
    0
    AlTk , угу, сеньк... я уж на перле набросал...