Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Из ListBox в Image [D7, XP]


Adios ©   (2006-02-25 23:49:00) 

Как выбранную в листбоксе картинку установить в имидж?


Adios   (2006-02-26 05:58:00) [1]


> Jpeg

Спасибо ОГРОМНОЕ!


Джо   (2006-02-26 05:47:00) [2]

uses ..., Jpeg,....;


Adios   (2006-02-26 05:42:00) [3]

как загрузить разобрался уже, но тут ещё одна проблема возникла,
я использовал filelistbox если что, так вот, имеется ряд bmp и среди них есть jpg, вот часть кода:
procedure Tmenu1.downClick(Sender: TObject);
begin
 if col=z then
   begin
   col:=0;
   FileListBox1.ItemIndex:=col;
   previev.Picture.LoadFromFile(FileListBox1.Filename);
   no.Caption:='No'+' '+inttostr(col+1)+'  èç'+'  '+inttostr(x);
   end
 else
   begin
   col:=col+1;
   FileListBox1.ItemIndex:=col;
   previev.Picture.LoadFromFile(FileListBox1.Filename);
   no.Caption:='No'+' '+inttostr(col+1)+'  èç'+'  '+inttostr(x);
   end
end;
с bmp всё нормально работает, но когда указатель доходит до jpg, выскакивает окно "исключение класса EInvalid graphic с сообщением Unknown picture file extension (.jpg)"
если кто знает как бороться то поделитесь мнениями.
                                                                    заранее благодарен.


homm   (2006-02-25 23:55:00) [4]


> Как выбранную в листбоксе картинку установить в имидж?
Листбокс не хранит картинок.


Галинка   (2006-02-25 23:50:00) [5]

LoadFromFile напрашивается. Но надо знать что вы имеете в ListBox ))


Наверх

Титульная страница Поиск, карта сайта Написать письмо