Главная страница
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.05 c
14-1099531403
ИМХО
2004-11-04 04:23
2004.12.12
Королевство ночи...


6-1096626563
Дмитрий Ботвин
2004-10-01 14:29
2004.12.12
Объём оперативки на удаленном компе


1-1101634029
AdmeraL.
2004-11-28 12:27
2004.12.12
Dialogs


1-1100888593
Kurtevich
2004-11-19 21:23
2004.12.12
Потеря модальности


14-1101314862
Defunct
2004-11-24 19:47
2004.12.12
Янукович побел на выборах