Главная страница
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-49542
Magician
2004-01-02 11:03
2004.01.16
Как найти значек, с которым ассоциирован данный файл.


7-49782
AngryMac
2003-10-31 20:17
2004.01.16
RS-232


9-49381
MeF88
2003-07-02 15:18
2004.01.16
Alpha-channel в Direct3D


1-49532
~GaMeRd~
2003-12-28 14:37
2004.01.16
Шрифты


1-49601
_hunter_
2004-01-05 12:02
2004.01.16
Как отключить автопрокрутку...