Как обратиться к изображению TImageList по индексу?

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
Аватара пользователя
qivi
энтузиаст
Сообщения: 703
Зарегистрирован: 19.01.2009 12:45:54
Откуда: Россия

Как обратиться к изображению TImageList по индексу?

Сообщение qivi »

Как можно добраться в TImageList до изображения под определённым индексом что бы его заменить во время исполнения программы?
iskander
энтузиаст
Сообщения: 630
Зарегистрирован: 08.01.2012 18:43:34

Сообщение iskander »

Код: Выделить всё

ImageList.Replace(AIndex,NewImage,nil);
Аватара пользователя
qivi
энтузиаст
Сообщения: 703
Зарегистрирован: 19.01.2009 12:45:54
Откуда: Россия

Сообщение qivi »

iskander, спасибо.

Можно спрошу здесь же, работаю с канвой, нужно на канву скопировать изображение из TImageList в заданные координаты, что то вроде Draw(Х,Н,TBitMap) - только заместо TBitMap изображение из TImageList.
iskander
энтузиаст
Сообщения: 630
Зарегистрирован: 08.01.2012 18:43:34

Сообщение iskander »

Код: Выделить всё

  procedure Draw(ACanvas: TCanvas; AX, AY, AIndex: Integer; ADrawEffect: TGraphicsDrawEffect); overload;

qivi, вы в справку вообще заглядываете?
Ответить