Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.08.26;
Скачать: CL | DM;

Вниз

ImageList - добавление картинок в RunTime   Найти похожие ветки 

 
master_asasin   (2007-07-27 20:34) [0]

Надо во время выполнения программы добавить в ImageList
картинки из папки.Причем в папке могут быть и jpeg и bmp, и png,и gif файлы.Если кто знает как это реализовать в Delphi 7
помогите пжалста,очень надА!
Если напишите весь код или ,исчо лучше киданете на мыло исходники, буду очень признателен. Заранее СПАСИБО.


 
savyhinst ©   (2007-07-28 21:38) [1]

Кидаешь на форму 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;


 
savyhinst ©   (2007-07-28 21:39) [2]

Ну как, помогло!?


 
DrPass ©   (2007-07-28 21:56) [3]


> Ну как, помогло!?

Ему не знаю, но мне существенно полегчало


 
master_asasin   (2007-07-29 17:24) [4]

Да спасибо. Но как быть с остальными форматами?(jpeg,png,gif)


 
DrPass ©   (2007-07-29 17:55) [5]

Конвертировать в bmp и загружать вышеуказанным способом. Для jpeg есть стандартный модуль jpeg и класс TJPEGImage, для остальных надо искать в тырнете



Страницы: 1 вся ветка

Текущий архив: 2007.08.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
2-1186066654
JaK[Light]
2007-08-02 18:57
2007.08.26
Потоки и volatile


4-1172688389
Eraser
2007-02-28 21:46
2007.08.26
CreateProcessAsUserW и ошибка ERROR_PIPE_NOT_CONNECTED


15-1185649384
Poed
2007-07-28 23:03
2007.08.26
Помогите выбрать IDE для проведения олимпиад.


15-1185858638
Slider007
2007-07-31 09:10
2007.08.26
С днем рождения ! 31 июля 2007 вторник


15-1185877291
savyhinst
2007-07-31 14:21
2007.08.26
[Прочессы играют в прятки] - Сенсация.ехе!