![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как в файл строки в начало дописывать?
Dysan © (2005-08-24 18:14:00)Не подскажите как лучше в текстовый файл строки писать не в конец а как обычно они добавляються например с помощью Append(); а в начало файла?
есть конечно вариант путём перекидывания из файла в файл но мне этот способ кажеться кривоватым.
Плохиш (2005-08-24 18:36:00) [1]
> ocean © (24.08.05 18:28) [4]
1. Речь про текстовыефайлы
2. Переписывать начала файла вроде никто не просил.
Dysan (2005-08-24 18:28:00) [2]о! что-то подобное наверное будет лучшим вариантом !
спасибо!
ocean (2005-08-24 18:28:00) [3]Reset + Seek, см. в Help
По умолчанию Reset открывает файл на чтение и запись:
FileMode: Byte = fmOpenReadWrite;
Seek ставит указатель в нужную позицию, т.е. в начало. Далее - Write
TStas (2005-08-24 18:26:00) [4]А это подойдет?
var
list:TStringList;
path:String;
begin
list:=TStringList.Create;
list.LoadFromFile(path);
list.Insert(str, 0);
list.SaveToFile(path);
list.Free;
end;
Alexander Panov (2005-08-24 18:23:00) [5]Как ни странно, это и есть правильный путь.