Скачать: CL | DM;

удалить строку   Найти похожие ветки 

← →
Daria   (2005-12-23 15:50) [0]

Молодые люди! ПОМОГИТЕ!!! как удалить из текстового файла пустые строки???

---

← →
Johnmen ©   (2005-12-23 15:53) [1]

Я не помогу. Немолодой уже.......
Хотя что-то ещё помню: зачитать файл, удалить строки, записать.....

---

← →
The_scorpion ©   (2005-12-23 15:56) [2]

Попробуй файл удали, должны и пустые строки удалиться...:)))

---

← →
Плохиш ©   (2005-12-23 15:59) [3]

> Daria   (23.12.05 15:50)  
> Молодые люди! ПОМОГИТЕ!!! как удалить из текстового файла
> пустые строки???

Дочка, в файлах нет строк.

---

← →
Anatoly Podgoretsky ©   (2005-12-23 16:14) [4]

Плохиш ©   (23.12.05 15:59) [3]
В текстовых файлах есть.

---

← →
umbra ©   (2005-12-23 16:46) [5]

один из способов - загрузить файл в TStrings, удалить пустые строки, сохранить под тем же именем

---

← →
Плохиш ©   (2005-12-24 00:18) [6]

> Anatoly Podgoretsky ©   (23.12.05 16:14) [4]
> Плохиш ©   (23.12.05 15:59) [3]
> В текстовых файлах есть.

В интерпретации, после обработки есть, а в самом файле есть только набор байтов :-)

---

← →
з. танька   (2005-12-24 00:51) [7]

мона прошвырнуться по файлу и дубли #13#10 удалить..

---

← →
Johnmen ©   (2005-12-24 01:00) [8]

А дубли #10 не надо?

---

← →
Германн ©   (2005-12-24 02:36) [9]

2 Johnmen ©  (23.12.05 15:53) [1]
А если бы вопрос был бы типа - "Мальчики! ПОМОГИТЕ!!! как удалить из текстового файла пустые строки???
Как бы ты ответил? :-)
Пошел бы ты по пути Digiman?
Или тоже говорил-бы про "дубли #10"?
:-)

---

← →
MBo ©   (2005-12-24 07:58) [10]


Открыть текстовый файл A на чтение
Открыть текстовый файл B на запись
пока не конец A
 читать строку из A
 если строка не пустая, то
   записать строку в B
конец
закрыть A
закрыть B  

---

← →
vidiv ©   (2005-12-24 08:08) [11]

var s:TStringList; i: integer;
begin
s := TStringList.Create();
s.LoadFromFile("text.txt");
i:=0;
while i<s.count do
 if trim(s[i])="" then
   s.delete(i)
 else
   inc(i);
s.SaveToFile("text.txt");
end;
Я бы так сделал

---

← →
Anatoly Podgoretsky ©   (2005-12-24 11:18) [12]

vidiv ©   (24.12.05 08:08) [11]
Если файл не большой, и лучше цикл for downto

---

← →
Johnmen ©   (2005-12-24 20:46) [13]

>Германн ©   (24.12.05 02:36) [9]

Для женского пола исключения не было бы.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.031 c