Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Отобразить Images по очереди из каталога (С++ Builder 6)

4.6K
03 мая 2008 года
SerG1nho
72 / / 30.10.2006
На форме присутствуют - OpenDialog, Image1, ну и соответсвующие button'ы.
С помощью OpenDialog'а надо указать папку из которой отобразить каждый рисунок по очереди (делаю с помощью LoadFromFile) кнопкой Next.
Please, help..
9.4K
03 мая 2008 года
AIGrifon
165 / / 13.11.2007
После указания директории нужно произвести поиск всех картинок в ней.
Это делается с помощью функций FindFirst и FindNext и типа TSearchRec.
Вот код для Delphi, на Builder перевести не составит особого труда. В приведенном ниже коде происходит поиск всех файлов jpg и вывод их имен с помощью сообщений.

[highlight=Delphi]
var
hFindFile: THandle;
SearchRec: TSearchRec;

begin
//Первый параметр называется маской, но в него можно включать и
//путь.
hFindFile := FindFirst('*.jpg', faAnyFile, SearchRec);
if hFindFile <> INVALID_HANDLE_VALUE then
try
repeat
if (SearchRec.Name = '.') or (SearchRec.Name = '..')
or SearchRec.Name = '') then continue;

ShowMessage(SearchRec.Name);

until (FindNext(SearchRec) <> 0);
finally
FindClose(SearchRec);
end;
end;
[/highlight]
4.6K
03 мая 2008 года
SerG1nho
72 / / 30.10.2006
Спасибо, сейчас попробуем-с...

Знаете кого-то, кто может ответить? Поделитесь с ним ссылкой.

Ваш ответ

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог