Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как в файл строки в начало дописывать?


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]

Как ни странно, это и есть правильный путь.


Наверх

Титульная страница Поиск, карта сайта Написать письмо