| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создать в каталоге, 35 подкаталогов с именами лат. алфавита и 0-9 [D2005, XP]
Леонид Артюхов © (2009-12-02 19:16:00)Всем привет,
Доброго времени суток, Уважаемые Мастера!
В своей ежедневной работе и так сказать ИТ жизни, сталкиваюсь с такой необходимостью, как каталогизирование различного софта и т д
Так вот, решил написать микро-утилиту, чтобы в один клик создавала в указанном каталоге, подкаталоги с именами от a...9. То есть теперь сам вопрос, не подскажите ли Вы Многоуважаемые, как создать такой Алгоритм (функцию)? подкаталоги должны быть в латинском алфавите и с именами: a,b,c,d,e,f,g,h,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,0,1,2,3,4,5,6,7,8,9.
C Уважением, Леонид!
Anatoly Podgoretsky (2009-12-02 19:30:00) [21]Какую букву из 36 нельзя использовать?
antonn (2009-12-02 19:21:00) [22]ord('a') - вернет код латинской буквы "а".
char(65) - вернет символ большой латинской А. Коды идут подряд, 66 - это большая В, 67 - С. Нетрудно догадаться, что все это можно запихнуть в цикл:
for i:=65 to 67 do
createdir(char(i));
ну и дальше по аналогии :)
DVM (2009-12-02 19:20:00) [23]
> Леонид Артюхов
Имена каталогов заносишь в массив.
Проходишь циклом по элементам массива
Создаешь каталоги
| |
Страницы: 