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

Вниз

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

 
dm37   (2003-03-18 12:08) [0]

Подскажите, как мне писать в файл, что-бы вновь вставленные строки быле не в конце, а в начале файла.
Спасибо.


 
jack128   (2003-03-18 14:27) [1]

begin
with TStringList.Create do
try
LoadFromFile("c:\test.txt");
if Count <> 0 then
Insert(0,"my string");
else
Add("my string");
SaveToFile("c:\test.txt");
finally
Free;
end;

end;


 
Андрей Сенченко   (2003-03-18 14:30) [2]

И в чем проблема ? Напиши в начало, а затем допиши туда все остальное.


 
dm37   (2003-03-18 14:53) [3]

Этот файл будет использоваться для ведения лога(и размер может быть большим). Кроме варианта который предложил jack128 больше ничего не сделать?


 
Андрей Сенченко   (2003-03-18 15:11) [4]

Я все-равно не понимаю - в чем проблема ?
Пиши лог в текущий TStringList, а для показа его и сохранения в файл при завершении работы - инвертируй цикл перебора строк


 
Palladin   (2003-03-18 15:42) [5]


> dm37 (18.03.03 14:53)

если ведется лог, то порядком следования записей можно пренебречь...
лог это не то место в программе что бы его украшать...



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

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

Наверх




Память: 0.44 MB
Время: 0.006 c
1-100250
Юлия
2003-03-18 17:36
2003.03.31
Создание своих компонентов


14-100405
han_malign
2003-03-13 18:27
2003.03.31
Так и эти поняли прелесть Интернета, а что дальше будет???


3-100155
ki11er
2003-03-04 21:11
2003.03.31
---|Ветка была без названия|---


1-100224
cLe0
2003-03-14 14:09
2003.03.31
ValueListEditor и уникальность ключей


14-100409
Ahmad K
2003-03-09 21:02
2003.03.31
Хакеры или ламеры?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский