Войти

Показать полную графическую версию : Циклическая смена изображений по клику


Alloc
15-07-2014, 22:15
Приветствую многоуважаемые форумчане!

Помогите реализовать циклическую смену изображений по клику на TImage.

Вообщем есть две картинки в ресурсах. Мне необходимо чтобы они грузились по клику поочередно, т.е. у меня TImage выполняет функцию кнопки "Вкл./Выкл.". При нажатии грузится первая при следующем нажатии грузится вторая и т.д.

Знаю что можно грузить так:


var
RS: TResourceStream;
begin
RS := TResourceStream.Create(HInstance, 'Enabled', RT_RCDATA);
try
Image1.Picture.Bitmap.LoadFromStream(RS);
finally
RS.Free;
end;


как реализовать грамотно, подскажите люди добрые?




© OSzone.net 2001-2012