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

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

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 30.11.2007, 01:07   #1
Volkogriz
Форумчанин
 
Аватар для Volkogriz
 
Регистрация: 11.10.2007
Сообщений: 384
Восклицание анимация в Image!?

Всем доброе время суток!!!
Подскажите пожалусто как зделать анимацию в Image!?!
Нужно чтобы странички книги переварачивались красиво а не просто менялись картинки !!!
Каждая страничька это рисунок bmp !
Вот кусок кода:
Код HTML:
procedure TForm1.Image1Click(Sender: TObject);
begin
Image.Picture.LoadFromFile('Sys/Servis/List_'+IntToStr(I)+'.bmp');
 if I > 0 then Dec(I);
end;

procedure TForm1.Image2Click(Sender: TObject);
begin
 Image.Picture.LoadFromFile('Sys/Servis/List_'+IntToStr(I)+'.bmp');
 if I < 20 then Inc(I);
end;
Зарание блогодарен!!!
С уважением Volkogriz!!!
Не количеством плюсов измеряется репутация человека...!
Volkogriz вне форума Ответить с цитированием
Старый 30.11.2007, 04:02   #2
KORN
Банхаммер
Участник клуба
 
Аватар для KORN
 
Регистрация: 17.02.2007
Сообщений: 1,754
По умолчанию

А как ты вообще хочешь сделать эту анимацию? принцип работы...

лучше используй компонент анимэйтед во время переворота страницы подгрузи в нее гиф на котором будет нарисована переворачивающая страница... а после него сразу грузи страницу...
Перед тем как спросить ищи на форуме и в GOOGLE

Последний раз редактировалось zetrix; 30.11.2007 в 06:59.
KORN вне форума Ответить с цитированием
Старый 30.11.2007, 19:34   #3
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Это легче сделать в DX или OpenGL. В имидже это сделать проблематично, я имею ввиду манипуляции с одним изображением.
Ну или как уже сказали делать анимацию по типу GIF, сам GIF файл не обязательно делать, достаточно иметь серию рисунков. Вывести их поочередно не составит труда.
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог
mutabor вне форума Ответить с цитированием
Старый 30.11.2007, 22:17   #4
Volkogriz
Форумчанин
 
Аватар для Volkogriz
 
Регистрация: 11.10.2007
Сообщений: 384
По умолчанию

ВСЕМ СПАСИБО!!!
Буду пробавать мож чё путёвое выдит!
С уважением Volkogriz!
Не количеством плюсов измеряется репутация человека...!
Volkogriz вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Анимация SanekIrk Общие вопросы Delphi 2 15.08.2008 21:57
Анимация SanekIrk Общие вопросы Delphi 11 08.08.2008 15:24
Анимация AVI Hottabych Мультимедиа в Delphi 5 16.03.2008 16:10
Анимация Rembo Софт 6 02.12.2007 18:31
Help me on QBasic. Анимация. toad88 Помощь студентам 2 16.11.2007 21:58