Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Циклическая смена изображений по клику (http://forum.oszone.net/showthread.php?t=285130)

Alloc 15-07-2014 22:15 2377010

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

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

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

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

Код:

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

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


Время: 06:47.

Время: 06:47.
© OSzone.net 2001-