Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.05.2010, 13:51   #1
Terrance!
Пользователь
 
Регистрация: 12.05.2010
Сообщений: 66
По умолчанию проблема с анимацией

Нужно чтобы изображение менялось покадрово
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var
kadr:integer;
x:boolean;
begin
x:=false;
x:=(kadr<1)and (kadr>7);//ограничение количества кадров
kadr:=kadr+1;//чтобы картинки брались поочерёдно
Image2.Picture.Bitmap.LoadFromFile (IntToStr(kadr)+'.bmp');
if kadr:=7 then kadr := 1;
image2.Top:=image2.Top-2;
end;
Вылазит ошибка, что невозможно найти кадр№ 9322017.Как ограничить количество кадров, раз таким способом не получилось?
Terrance! вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с анимацией Манжосов Денис :) Gamedev - cоздание игр: Unity, OpenGL, DirectX 30 17.11.2009 20:57
Delphi 7 проблема с Анимацией Rus 47 Помощь студентам 1 26.05.2009 00:17
Помогите с анимацией проги! Aboltus Общие вопросы Delphi 3 29.07.2008 23:21
Задача с анимацией KpeHDeJIb Помощь студентам 1 04.07.2008 20:23
Помогите с анимацией в Паскале ЕвгениуS Помощь студентам 6 06.06.2008 15:10