Главная страница
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.044 c
2-1178477740
Dmitry_177
2007-05-06 22:55
2007.05.27
Exit


3-1173781864
Дмитрий А.
2007-03-13 13:31
2007.05.27
Как через ADO из Delphi создать столбец в таблице Access?


15-1177672151
Иксик
2007-04-27 15:09
2007.05.27
Снова, уж простите


15-1177609948
YurikGL
2007-04-26 21:52
2007.05.27
Спам в одной ветке


2-1178731051
Strate
2007-05-09 21:17
2007.05.27
Динамичное создение контролов