Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.03.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.007 c
1-100246
Ptr
2003-03-18 16:24
2003.03.31
Замена символов в WordXP


14-100454
Феликс
2003-03-12 21:26
2003.03.31
Сны


1-100253
AntMal
2003-03-18 17:51
2003.03.31
Как быть с этим Memo


3-100141
Фагот
2003-03-06 13:11
2003.03.31
SQL


4-100521
Nick_N_A
2003-01-29 05:22
2003.03.31
Standart windows controls





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский