Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> ImageList 
:(
    Опции темы
grib
Дата 13.10.2004, 22:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.9.2004
Где: уфа

Репутация: нет
Всего: нет
немогу перерисовать Image, т.е. один раз он картинку рисует, но поменять не хочет.
Код
ImageList1.GetBitMap(0,Image1.Picture.Bitmap);
ImageList1.GetBitMap(1,Image1.Picture.Bitmap); //неработает

sad.gif

PM MAIL   Вверх
Alex
Дата 13.10.2004, 23:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 1
Всего: 162
Код
ImageList1.GetBitMap(0,Image1.Picture.Bitmap);
Image1.Picture.Bitmap:=  nil;
ImageList1.GetBitMap(1,Image1.Picture.Bitmap);


Это сообщение отредактировал(а) Alex - 13.10.2004, 23:04


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
grib
Дата 13.10.2004, 23:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.9.2004
Где: уфа

Репутация: нет
Всего: нет
то есть надо сначала очистить Image - OK я понял, а почему ТАК? - просто интересно
PM MAIL   Вверх
Alex
Дата 13.10.2004, 23:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 1
Всего: 162
Из ImgList.pas:
Код
function TCustomImageList.GetBitmap(Index: Integer; Image: TBitmap): Boolean;
begin
 Result := (Image <> nil) and HandleAllocated and (Index > -1) and (Index < Count);
 if Result then
   with Image do
   begin
     Height := FHeight;
     Width := FWidth;
     Draw(Canvas, 0, 0, Index);
   end;
end;



--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
grib
Дата 13.10.2004, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 23.9.2004
Где: уфа

Репутация: нет
Всего: нет
ведь когда делаешь без ImageList'а так не надо делать?
Image1.Picture.LoadFromFile('1.bmp');
Image1.Picture.LoadFromFile('2.bmp');
и все работает!

Добавлено @ 23:18
ага, спасибо, понял
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0428 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.