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

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

Как в Delphi программно создать файл?

Linux ©   (2002-03-22 20:11:00) 

Сейчас пишу прогу, в которой надо создать файл со случайными именами? Как это можно реализовать на Дельфи?

---

Song   (2002-03-22 22:20:00) [1]

Гораздо проще через:

function MakeTempFilename: string;

---

FoxerMoxer   (2002-03-22 20:15:00) [2]

randomize;
for i:=1 to 10 //длина имени файла
do
begin
a:=chr(random(9000);
end;
assignfile(f,"c:\"+a);
rewrite(f);
write(f,"данные);
closefile(f);

Вот и все

---

FoxerMoxer   (2002-03-22 20:15:00) [3]

randomize;
for i:=1 to 10 //длина имени файла
do
begin
a:=a+chr(random(9000);
end;
assignfile(f,"c:\"+a);
rewrite(f);
write(f,"данные);
closefile(f);

Вот и все

---

Наверх