| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ImageList - добавление картинок в RunTime [D7, WinXP]
master_asasin © (2007-07-27 20:34:00)Надо во время выполнения программы добавить в ImageList
картинки из папки.Причем в папке могут быть и jpeg и bmp, и png,и gif файлы.Если кто знает как это реализовать в Delphi 7
помогите пжалста,очень надА!
Если напишите весь код или ,исчо лучше киданете на мыло исходники, буду очень признателен. Заранее СПАСИБО.
DrPass (2007-07-29 17:55:00) [1]Конвертировать в bmp и загружать вышеуказанным способом. Для jpeg есть стандартный модуль jpeg и класс TJPEGImage, для остальных надо искать в тырнете
master_asasin (2007-07-29 17:24:00) [2]Да спасибо. Но как быть с остальными форматами?(jpeg,png,gif)
DrPass (2007-07-28 21:56:00) [3]
> Ну как, помогло!?
Ему не знаю, но мне существенно полегчало
savyhinst (2007-07-28 21:39:00) [4]Ну как, помогло!?
savyhinst (2007-07-28 21:38:00) [5]Кидаешь на форму ImageList
загружать так:
[но только bmp]
const
dir='C:\';
var
sr:TSearchRec;
bmp:TBitmap;
begin
bmp:=TBitmap.create;
if FindFirst(dir+'*.bmp',faAnyFile,sr)=0 then
repeat
bmp.LoadFromFile(dir+sr.Name);
ImageList.Add(bmp,bmp);
until FindNext(sr)<>0;
FindClose(sr);
bmp.Free;
end;
| |
