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

Вниз

Работа с файлами.   Найти похожие ветки 

 
XPatriot   (2001-12-21 14:50) [0]

Как реализовать чтение построчно, из текстового файла, и при
нахождении нужной строки вставить после нее текст, не удоляя следущий....


 
MBo ©   (2001-12-21 15:13) [1]

проще всего так
var s:tstringlist;
i:integer;
begin
s:=tstringlist.create;
s.loadfromfile("c:\qq.txt");
for i:=0 to s.count-1 do
if pos(chegoto,s[i])>0 then s[i]:=s[i]+texttoinsert;
//если надо новую строку, подправь, но не забудь, что Count увеличится -
//тогда лучше не for а while

s.savetofile("c:\qq.txt");//если в тот же файл
s.free;



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
6-28524
Алексей Штыков
2001-10-16 14:38
2002.01.10
Как втихую проверить обновления (любые) с сервера.?


3-28424
Adulteress
2001-12-08 23:53
2002.01.10
Глюк в DCom приложении или глюк Дельфи?


3-28443
PVR
2001-12-06 17:58
2002.01.10
Хочу записать звук с микрофона в фиелд


3-28408
urii
2001-12-07 17:26
2002.01.10
перенос


6-28521
Serguar
2001-10-10 12:42
2002.01.10
Вопрос по TUDPServer/TUDPClient из Indy