Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

ImageList

Alek_1 © (2002-11-30 02:06:00)
Доброе врямя суток.

Не могли бы вы подсказать как програмно добавить в ImageList картинки а то у меня ничего не выходит.

Заранее спасибо.

wam (2002-12-04 01:59:00) [1]
А размеры и глубина цвета у картинок одинаковые?

Alek_1 (2002-12-04 01:20:00) [2]

> Goblinus ©

> Не знаю, почему. Попробуй запустить пошагово и выясни, где
> трабл.

Ошибка вылетает в этой строке:
ImageList1.AddMasked(B, clBlack);

Goblinus (2002-12-02 01:18:00) [3]

> теперь у меня другая проблема
>
> когда когда я написал код который мне предложил
> > Goblinus
>
> то при загрузке бмп файла размеров в 2 килобайта вылетает
> ошибка
>
> invalid image size
>
> как от этого избавиться??

Не знаю, почему. Попробуй запустить пошагово и выясни, где трабл.

> и еще можно ли в imagelist загрузить jpg или gif картинку
> если нет то может подскажите аналог imagelista который это
> позволяет делать.
> Спасибо за ваши ответы.

JPG: Просто сначала конвертишь JPG в BMP, а потом точно также.
Пример конертации есть в FAQ на этом сайте

GIF: Также конвертишь, как JPG в BMP, но используя спец. компонент, TRxGifAnimator, напр...

:)

Alek_1 (2002-12-02 01:09:00) [4]

> TTCustomDelphiMaster

Интересная идея попробую. Спасибо.

TTCustomDelphiMaster (2002-12-01 11:51:00) [5]
Alek_1 © (01.12.02 02:13)
А зачем вам imagelist. Используйте array of TPicture.

Song (2002-12-01 11:13:00) [6]
>>Такие вещи следует заключать в блок try-finally-end.
Нет, совсем не обязательно. Это как захочет разработчик.
Почему Вы так думаете?

Alek_1 (2002-12-01 02:13:00) [7]
и еще можно ли в imagelist загрузить jpg или gif картинку
если нет то может подскажите аналог imagelista который это позволяет делать.
Спасибо за ваши ответы.

Alek_1 (2002-12-01 01:12:00) [8]
теперь у меня другая проблема

когда когда я написал код который мне предложил
> Goblinus

то при загрузке бмп файла размеров в 2 килобайта вылетает ошибка

invalid image size

как от этого избавиться??

Дмитрий К.К. (2002-11-30 08:42:00) [9]

> Goblinus © (30.11.02 02:25)

Такие вещи следует заключать в блок try-finally-end.

Alek_1 (2002-11-30 02:32:00) [10]
Спасибо.

Goblinus (2002-11-30 02:25:00) [11]
var
B: TBitmap;
begin
B := TBitmap.Create;
B.LoadFromFile(FileName);
ImageList1.AddMasked(B, MaskColor) //Maskcolor - цвет маски, например, clFuchsia
B.Free;
end;

Наверх

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