Форум: "Начинающим";
Текущий архив: 2007.05.27;
Скачать: [xml.tar.bz2];

Вниз

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

← →
Первакласник Вася   (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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.042 c