Главная страница
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.047 c
15-1177827660
iZEN
2007-04-29 10:21
2007.05.27
Вышла первая часть книги Lazarus Delphi-кросс-платформенный.


6-1163753017
Layner
2006-11-17 11:43
2007.05.27
TIdTCPServer - узнать IP или имя кто к нему приконнектился...


15-1177900456
ctudent
2007-04-30 06:34
2007.05.27
WoW


15-1177666772
Ega23
2007-04-27 13:39
2007.05.27
Умер Мстислав Растропович.


2-1178384918
Kostafey
2007-05-05 21:08
2007.05.27
Использование русских названий в тексте SQL-запроса.