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

Вниз

Записать в файл   Найти похожие ветки 

 
Gnom ©   (2004-01-05 23:14) [0]

Добрый день, подскажите плз
вот огрызок тривиального кода

var F:textfile;
begin
assignfile(f,"123.txt");
append(f);

так вот, как мне изменить самую первую строчку этого файла, не трогая следущие строчки...?


 
Clift ©   (2004-01-05 23:21) [1]

Seek()
см.Help


 
Eugene ©   (2004-01-05 23:21) [2]

Можно, например так: ВАР Ф:ТЕКСТФИЛЕ;


 
Gnom ©   (2004-01-05 23:34) [3]

>Clift

толи у меня хэлп урезанный толи я тупой, но seek нету((
а как им пользоваться?
в параметрах ему нужно указать f:texfile и какойто N , что этот N определяет?


 
Gnom ©   (2004-01-05 23:35) [4]

мля и вообще seek с текстовыми файлами не работает почемуто


 
raidan ©   (2004-01-06 00:04) [5]

А он с тектовыми файлами и не обязан работать.
А сброс файла с переходом на первую строку делается reset(f), а не append(f)...
Вот только записать ты не сможешь, только прочитать...
Поэтому придется, скорее всего, переписывать весь файл или отказаться от текстового и перейти к нетипизированному...


 
Eugene1501 ©   (2004-01-06 03:03) [6]

var
AFile:TStrings;
begin
AFile:=TStringList.Create;
AFile.LoadFromFile("123.txt);

AFile.Strings[0]:="Здесь изменяешь первую строку"

...

AFile.SaveToFile("123.txt);
AFile.Free;
end;

По моему это самый простой способ.



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
1-49585
Cash
2004-01-05 13:53
2004.01.16
Разбираем ListView


6-49658
VID
2003-11-10 15:13
2004.01.16
Банальное: передача файла с помощью TServerSocket & TClientSocket


1-49527
lipskiy
2003-12-17 23:13
2004.01.16
Прокрутка колесом мыши


7-49780
~gamerd
2003-11-02 20:54
2004.01.16
Темы Винды


3-49386
Patrick
2003-12-22 09:21
2004.01.16
Настройка Oracle.