Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 17.10.2012, 23:30
Аватар для DeOne
DeOne DeOne вне форума
Новичок
 
Регистрация: 24.09.2012
Сообщения: 86
Версия Delphi: 7
Репутация: 10
По умолчанию Как сделать загрузку картинок через папку

Вообщем нужно сделать заливку случайных фотографий из папки, раньше делал только заливку одной фотографии.

Помогите, пожалуйста.

Представляю это так: Из папки парсятся имена картинок, записываются в переменную типа Тстринглист, а потом просто подставляются, если это так, то как спарсить имена из папки?
__________________
Только учусь Delphi...
Ответить с цитированием
  #2  
Старый 18.10.2012, 00:13
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

использовать для этого FindFirst/FindNext.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #3  
Старый 18.10.2012, 07:29
Аватар для dr. F.I.N.
dr. F.I.N. dr. F.I.N. вне форума
I Like it!
 
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
По умолчанию

Цитата:
Сообщение от DeOne
...то как спарсить имена из папки?
Вот тут уйма примеров аналогичного вопроса.
__________________
Грамотно поставленный вопрос содержит не менее 50% ответа.
Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть.
Ответить с цитированием
  #4  
Старый 18.10.2012, 07:55
Аватар для DeOne
DeOne DeOne вне форума
Новичок
 
Регистрация: 24.09.2012
Сообщения: 86
Версия Delphi: 7
Репутация: 10
По умолчанию

А можешь хоть 1 пример скинуть?
__________________
Только учусь Delphi...
Ответить с цитированием
  #5  
Старый 18.10.2012, 08:01
Аватар для dr. F.I.N.
dr. F.I.N. dr. F.I.N. вне форума
I Like it!
 
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
По умолчанию

Цитата:
Сообщение от DeOne
А можешь хоть 1 пример скинуть?
Зайди в тему по ссылке выше и скачай. Там как-минимум 2 примера!!!
А еще спроси у гугла Delphi FindFirst пример. Первая ссылка уже будет ответом на твой вопрос.
__________________
Грамотно поставленный вопрос содержит не менее 50% ответа.
Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть.
Ответить с цитированием
Этот пользователь сказал Спасибо dr. F.I.N. за это полезное сообщение:
DeOne (18.10.2012)
  #6  
Старый 18.10.2012, 08:10
Аватар для DeOne
DeOne DeOne вне форума
Новичок
 
Регистрация: 24.09.2012
Сообщения: 86
Версия Delphi: 7
Репутация: 10
По умолчанию

i f F i n d F i r s t ( ' C : \ W I N D OWS \ * . t x t ' , f a H i d d e n + f a S y s F i l e , F ) = 0 then

Это он парсит все названия файлов из папки с форматом txt ?
__________________
Только учусь Delphi...
Ответить с цитированием
  #7  
Старый 18.10.2012, 08:14
Аватар для dr. F.I.N.
dr. F.I.N. dr. F.I.N. вне форума
I Like it!
 
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
По умолчанию

Цитата:
Сообщение от DeOne
i f F i n d F i r s t ( ' C : \ W I N D OWS \ * . t x t ' , f a H i d d e n + f a S y s F i l e , F ) = 0 then

Это он парсит все названия файлов из папки с форматом txt ?
Простите, но я не буду боле отвечать на эти вопросы. Вы не удосужились даже прочитать указанные вам ссылки.
__________________
Грамотно поставленный вопрос содержит не менее 50% ответа.
Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 16:13.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025