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

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

Как генерировать кучу файлов с разными именами?

Zvr@b ©   (2004-07-08 00:38:00) 

Уважаемые мастера! Подскажите как сделать следующее: У меня программа должна генерировать определённое число HTML с разными именами (имена либо разные вовсе, либо с индексами 01,02,,,,03).
В чём суть... есть таблица с текстом,её нужно сохранить в htm но чтоб не в одну строку, а строки разделялись ентером. И соответственно добавлялись в начале и конце файла все необходимые Теги.
(...может работу программы (текст), засунуть в Memo и потом его сохранить его?...но мне нужен цикл)

Как задать цикл сохранения фалов в опредеённую папку (или хотябы в эту же). Нужно ли при этом пользоваться Save диалогом, или есть другие способы.
Как гененрировать имена файлов.

_Спасибо за внимание!

---

Igorek   (2004-07-08 21:10:00) [1]

GetTempFileName GetTempPath

---

OSokin   (2004-07-08 20:06:00) [2]


var dhtml:array[0..n]of string=('<HTML>','<BODY>',...)
...
for n:=0 to htmlcount do begin
 for i:=0 to length(dhtml) do Memo1.Lines.Add(dhtml[i]);
 Memo1.Lines.SaveToFile(inttostr(n)+'.html');
end;

---

Bart   (2004-07-08 09:48:00) [3]

если нет проблем с длиной строки тогда попробуй


var
 UniqueFileName: TGuid;
 i: Word;

...

for i := low({some}) to high({some}) do
begin
 CreateGuid(UniqueFileName);
 {something}.SaveToFile(GuidToString(UniqueFileName) + '.htm');
end;


или я не правильно понял

---

KilkennyCat   (2004-07-08 01:41:00) [4]

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

---

Zvr@b   (2004-07-08 01:39:00) [5]

А вот ЦИКЛ генерации никто не подскажет?...
Очень бы надо!

---

KilkennyCat   (2004-07-08 01:17:00) [6]

плохо понял текст, но если ответить по сабжу, то:

Возможно несколько вариантов:
1) всегда порядковый номер (1.html,2.html,3.html...)
реализовать можно несколькими способами.
а) если при каждом запуске программы наплевать на предыдущие - цикл начинается с начала.
б) если не наплевать на предыдущую работу, то полезно сохранить в какой-нить файл номер последнего файла, перед циклом прочитать его и начать генерацию со следующего.
2) случайный номер. Использовать генератор случайных чисел (Random). Но поскольку существует вероятность совпадения, необходимо проверять отсутствие файла с текущем именем (FileExists)
3) использовать в названии текущую дату и время (TDateTime, Now)

Диалог может быть полезен для: указания папки, указания варианта генерации, указания стартового номера при первом варианте, указания предела генератора случайных чисел во втором варианте и просто для перезаписи одного (или нескольких) из файлов.

---

Наверх