Тема: Разбить текст на части, подсказка
Показать сообщение отдельно
  #2  
Старый 31.01.2018, 21:32
Аватар для @Rafa3L
@Rafa3L @Rafa3L вне форума
Начинающий
  
Регистрация: 09.11.2011
Адрес: Москва
Сообщения: 144
Версия Delphi: XE2
Репутация: 11216
По умолчанию
Код:
...
 s:= ExtractFilePath(Application.ExeName) + 'Folder' + IntToStr(i);
 if ForceDirectories(s) then.. {Появилась такая папка, туды и класть}
...
__________________
Помогаю платно.
Помогаю иногда бесплатно.
Ответить с цитированием