| | | |
|
| Форум Delphi: Animation Splash Form (ASF) |
|
|
|
|
21 | #1145 | цитата | 26-03-2009 07:48 |
Я дико извиняюсь, но могли бы Вы более точно расписать установку данной компоненты под Delphi 2009? Заранее спасибо |
|
| |
|
22 | #1146 | цитата | 26-03-2009 11:40 |
Никакой установки.
Это не компонент, это модули. Их просто копируете к себе в каталог с проектом и подключаете. Добавляете в uses где надо, а дальше по демам. Если что не понятно, объясню. |
|
| |
|
23 | #1203 | цитата | 14-04-2009 18:01 |
Я так и не понял как добавить картинку PNG в файл ресурса? |
|
| | |
|
25 | #1217 | цитата | 16-04-2009 21:57 |
Andy BitOff
Хорошо, согласен, а файлы dat, по моему, совсем не файлы ресурсов:
"ASFAnimation _ ж ZR ASFIconsќ "? Как их создать? |
|
| |
|
26 | #1218 | цитата | 16-04-2009 22:18 |
Black
Файлы .dat содержат бинарные данные, а ресурсы, это тоже бинарные данные, и текст, и картинка, это все бинарные данные. Поэтому в ресурсы можно засунуть всё что угодно не считаясь с форматом.
Сохранить ресурсы ASF (то, что в файлах .da можно как показано в каждой демке и находится в закоментированном виде после строк:
delphi | //Первая загрузка из файлов и сохранение в один файл //Затем загрузка идет уже и того файла |
А именно:
delphi | AnimationSplashForm.Icons.LoadFromResource('ICON1', 'SPLASHDATA'); { // Первая загрузка из файлов и сохранение в один файл // Затем загрузка идет уже и того файла AnimationSplashForm.Icons.AddFromFile(SplashImagePath + 'ico1.png'); AnimationSplashForm.Icons.AddFromFile(SplashImagePath + 'ico2.png'); AnimationSplashForm.Icons.AddFromFile(SplashImagePath + 'ico3.png'); AnimationSplashForm.Icons.AddFromFile(SplashImagePath + 'ico4.png'); AnimationSplashForm.Icons.AddFromFile(SplashImagePath + 'ico5.png'); AnimationSplashForm.Icons.SaveToFile(SplashImagePath + 'Icons.dat');} // Это и есть сохранение ================== |
delphi | AnimationSplashForm.AnimationsAddFromResource('ANIMATION1', 'SPLASHDATA'); { // Первая загрузка из файлов и сохранение в один файл // Затем загрузка идет уже и того файла Anim1 := TAnimationFrames.Create; try Anim1.DelayBetweenImages := 5; // Пауза между повторами циклов анимации Anim1.DelayBetweenPassage := 150; Anim1.PositionLeft := 214; Anim1.PositionTop := 59; for I := 1 to 12 do begin s := IntToStr(i); if Length(s) = 1 then s := '0' + s; Anim1.AddFromFile(SplashImagePath + 'Animation1 ' + s + '.png'); end; AnimationSplashForm.AnimationsAdd(Anim1); Anim1.SaveToFile(SplashImagePath + 'Animation1.dat'); // Это и есть сохранение ===================== finally Anim1.Free; end;} |
Нужно раскоментировать эти места, закоментировав загрузку из ресурсов и работать с этим кодом пока не достигните желаемого результата. |
|
| |
|
27 | #1219 | цитата | 16-04-2009 22:57 |
Andy BitOff
Теперь понял, спасибо. |
|
| |
|
28 | #1220 | цитата | 16-04-2009 23:45 |
Да, забыл сказать. В следующей версии будет приятный сюрприз. Следите за обновлениями. |
|
| |
|
29 | #1223 | цитата | 17-04-2009 10:06 |
Andy BitOff
И ещё пожелание. Сделать ProgressBar управляемым т.е. чтобы можно было установить процент заполнения. |
|
| |
|
30 | #1224 | цитата | 17-04-2009 10:21 |
Andy BitOff
Добавлю пожелание... Хотелось-бы выставить заставу поверх всех окон. |
|
| |
| Тему просматривают: 2 гостей, 0 пользователей |
|
| Animation Splash Form (ASF) | Ответов: 128 |
|
|
|
|
Мини-чат :) |
|
|
Статистика |
| Сегодня | Всего |
Посетителей | 7168 | 4102489 |
Запросов | 155206 | 395564772 |
Online |
Пользователей | 0 |
Гостей | 320 |
|
|
|