Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Прочие вопросы

Прочие вопросы Вопросы не касающиеся программирования (установка, настройка...)

Ответ
 
Опции темы
Старый 24.02.2011, 22:17   #1
Rock2roll
Знающий
 
Аватар для Rock2roll
 
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений
(для 13 пользователей)
Что ж тут не то? Занимался HTML и забыл паскаль =(

С картинками всё норм...виснет после цикла

program Mp11;
var bgmx:integer;
bgm,pgb,prg:image;
begin
bgmx:=-240;
setColor(0,0,0);
fillRect(0,0,240,400);
setcolor(255,255,255);
drawText('Загрузка библиотеки...',10,10);
repaint;
{загрузка первого файла музыки}
delay(1000);
drawText('Загрузка среды...',10,30);
repaint;
bgm:=loadImage('/bgm.png');
pgb:=loadImage('/progback.png');
prg:=loadImage('/progress.png');
{загрузка всей графики}
delay(1000);
repeat
begin
bgmx:=bgmx+5;
drawImage(bgm,bgmx,0);
repaint;
end;
until true;

repaint;



drawImage(pgb,0,300);
repaint;
delay(100000);
end.
__________________
G502, GT S5230w user!
(Offline)
 
Ответить с цитированием
Старый 24.02.2011, 22:50   #2
GRAY_WOLF
Разработчик
 
Аватар для GRAY_WOLF
 
Регистрация: 16.08.2008
Адрес: Нижегородская провинция
Сообщений: 389
Написано 48 полезных сообщений
(для 93 пользователей)
Ответ: Что ж тут не то? Занимался HTML и забыл паскаль =(

delay(100000); 
Пауза 100 сек - это зачем?
__________________
- Это мы накодили WINDOWS,
- Это мы надкусили APPLE,
- Нам играют живые The Beatles
- И нестареющий Вова Высоцкий...
(Offline)
 
Ответить с цитированием
Старый 24.02.2011, 22:51   #3
YellowAfterlife
ПроЭктировщик
 
Аватар для YellowAfterlife
 
Регистрация: 19.02.2011
Сообщений: 134
Написано 81 полезных сообщений
(для 219 пользователей)
Ответ: Что ж тут не то? Занимался HTML и забыл паскаль =(

Все же можно предположить, что мидлет вылетает изза ресурсов. Посмотрите в консоль - там будет написана ошибка, вызывающая зависание.
Так же можно использовать процедуру debug(string) для пошаговой проверки - можно узнать, что и когда случается, и почему программа перестает работать.
Тестировал с следующим кодом, работает, возращает информацию о стадиях в консоль (Log).
program Mp11;
var 
bgmx:integer;
bgm,pgb,prg:image;
begin
bgmx
:=-240;
setColor(0,0,0);
fillRect(0,0,240,400);
setcolor(255,255,255);
drawText('Загрузка библиотеки...',10,10);
repaint;
{
загрузка первого файла музыки}
delay(1000);
drawText('Загрузка среды...',10,30);
repaint;
debug('Loading images...');
bgm:=loadImage('/icon.png');
pgb:=loadImage('/icon.png');
prg:=loadImage('/icon.png');
debug('Images loaded.');
{
загрузка всей графики}
delay(1000);
repeat
bgmx
:=bgmx+5;
drawImage(bgm,bgmx,0);
repaint;
until bgmx GetWidth;
debug('Loop done.');
repaint;
debug('Drawing pgb...');
drawImage(pgb,0,300);
repaint;
debug('Done.');
delay(100000);
end
__________________

Мой сайт-блог. Игры, обновления, примеры для Haxe, JavaScript(+HTML5), GameMaker, Love2d...
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
Rock2roll (24.02.2011)
Старый 24.02.2011, 22:59   #4
Rock2roll
Знающий
 
Аватар для Rock2roll
 
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений
(для 13 пользователей)
Ответ: Что ж тут не то? Занимался HTML и забыл паскаль =(

bgm должна выехать на экран! слева. А она не двигается..и в эмуле пишет в логе только 2 картинки загрузилось

Progress(null)!! вот в чём прикол. Что ж делать?

надо было не PNG а png писать)) нашел
__________________
G502, GT S5230w user!
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 12:36.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com