Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.05.27;
Скачать: CL | DM;

Вниз

Таймер   Найти похожие ветки 

 
Первакласник Вася   (2007-05-07 20:07) [0]

Привет!

На форме компонент image1. В папке "C:\test" есть 3 файла 01.ico, 02.ico и 03.ico. Как можно сделать так, чтобы эти файлы отображались последовательно? Я хочу что-то похожее на анимацию. Помогите пожалуйста советом!

С Уважением!


 
{RASkov} ©   (2007-05-07 20:27) [1]

> [0] Первакласник Вася   (07.05.07 20:07)

Посмотри:
const ArrIco: array [0..3] of String = ("0.ico", "1.ico", "2.ico", "3.ico");
procedure TForm.TimerOnTimer();
begin
 Tag:=Tag+1;
 Caption:= ArrIco[Tag and High(ArrIco)]; // Вместо этого грузи иконку куда надо.
 if Tag=High(Integer) then Tag:=0;
end;


 
grisme ©   (2007-05-07 20:55) [2]

жесть, подгружать во время анимации O_O не, лучше сперва загрузить, а потом уже из памяти...


 
Kolan ©   (2007-05-07 21:18) [3]

Не прошили сделать gif + TAnimate?



Страницы: 1 вся ветка

Текущий архив: 2007.05.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
2-1178874455
Marat
2007-05-11 13:07
2007.05.27
Процедура


2-1178633296
Regent
2007-05-08 18:08
2007.05.27
Вопрос по диалогу.


2-1178725924
metalpriest
2007-05-09 19:52
2007.05.27
Программное управление курсора в TEdit


1-1174519920
Makhanev Alexander
2007-03-22 02:32
2007.05.27
named pipes...


2-1178881839
Doom-2
2007-05-11 15:10
2007.05.27
:-) Анатомия копирования