Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

Сканирование файла   Найти похожие ветки 

 
Гриша   (2004-11-30 11:21) [0]

Как можно просканить файл на предмет наличия ключевого слова, например "File", и если оно в нем присутствует то его удалить?


 
ЮЮ ©   (2004-11-30 11:54) [1]

Не боишься за исходники своей программы? :)


 
Александр Иванов ©   (2004-11-30 11:59) [2]

Если файл небольшой, то:

Memo1.Lines.LoadFromFile(FilaName);
Str : = Memo1.Lines.Text;
Delete(Str,Pos("file",Str),4);
Memo1.Lines.Text := Str;
Memo1.Lines.SaveToFile(FileName);


 
Александр Иванов ©   (2004-11-30 12:00) [3]

Запарился вместо Memo, можно использовать TStringList


 
ЮЮ ©   (2004-11-30 12:07) [4]

>Delete(Str,Pos("file",Str),4);

Удалять надо файл !!!


 
Александр Иванов ©   (2004-11-30 12:13) [5]

ЮЮ ©   (30.11.04 12:07) [4]

Из [0] это абсолютно не следует.
Тогда DeleteFile :).


 
Anatoly Podgoretsky ©   (2004-11-30 12:34) [6]

Этот вариант гарантирует выполнение обеих условий.



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

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.056 c
3-1100363168
zz 5
2004-11-13 19:26
2004.12.12
View в Interbase


1-1101895430
denis24
2004-12-01 13:03
2004.12.12
listbox->event


3-1100382640
kirilllius
2004-11-14 00:50
2004.12.12
Размер Access и JPEG


14-1100851819
БареллО
2004-11-19 11:10
2004.12.12
Совместимость


3-1100155505
newby
2004-11-11 09:45
2004.12.12
Округление в футере EHLib DBGrid