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

Вниз

Создание текстовых файлов последовательно.   Найти похожие ветки 

 
Vik ©   (2012-04-29 16:41) [0]

Подскажите пожалуйста, как при нажатии кнопки, создать текстовый файл, например с именем "1.txt", при втором нажатии создать файл "2.txt", и так далее?


 
MBo ©   (2012-04-29 16:52) [1]

Вопрос в создании файла или в сквозной нумерации?


 
Vik ©   (2012-04-29 17:00) [2]

Извините за наглость, но хотелось бы и то и то=) Заранее спасибо.


 
MBo ©   (2012-04-29 17:18) [3]

Assignfile + rewrite+closefile или TStringList.SaveToFile
Для нумерации - нужна глобальная переменная  или поле формы


 
SMTP   (2012-05-01 10:19) [4]


MaxIndex := 1;
if FindFirst("*.txt", faAnyFile, SR) = 0 then
try
 repeat
   if TryStrToInt(Copy(SR.Name, 1, Pos(SR.Name, ".") - 1), NewIndex) then
     MaxIndex := NewIndex;
 until FindNext(SR) <> 0;
finally
 FindClose(SR);
end;

SL := TStringList.Create;
try
 SL.Add(IntToStr(MaxIndex));
 SL.SaveToFile(IntToStr(MaxIndex) + ".txt");
finally
 SL.Free;
end;


 
SMTP   (2012-05-01 10:20) [5]

if TryStrToInt(Copy(SR.Name, 1, Pos(SR.Name, ".") - 1), NewIndex) then

>>

if TryStrToInt(Copy(SR.Name, 1, Pos(SR.Name, ".") - 1), NewIndex) and (NewIndex > MaxIndex) then


 
Vik ©   (2012-05-01 13:14) [6]

Спасибо. Неужели норм ответы появились


 
KilkennyCat ©   (2012-05-01 21:33) [7]

надеюсь, нормальный ответ это [3]?


 
Vik ©   (2012-05-02 07:34) [8]

Думаю да


 
Inovet ©   (2012-05-02 08:34) [9]

Вопрос странный. Почему именно текстовые? Т.е. можно сделать вывод: для любых других последовательная нумерация получается, значит её мы делать умеем, как и создавать файлы, а вот именно с текстовыми проблема возникает.


 
Vik ©   (2012-05-02 15:01) [10]

На примере текстовых я имел ввиду. Создание других файлов тоже не умею производить.



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

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

Наверх




Память: 0.48 MB
Время: 0.05 c
2-1329896666
gu
2012-02-22 11:44
2013.03.22
Написать на рабочем столе


15-1352775498
Abcdef123
2012-11-13 06:58
2013.03.22
Современные тенденции пользовательского интерфейса


2-1332500814
alex810810
2012-03-23 15:06
2013.03.22
Передача параметра со значение NULL


15-1344373786
alexdn
2012-08-08 01:09
2013.03.22
SEO оптимизация


2-1331501068
Дмитрий
2012-03-12 01:24
2013.03.22
Сохранение файла из потока