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

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

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

Основной форум Сюда все проблемы связанные с программированием.

Ответ
 
Опции темы
Старый 25.06.2010, 12:13   #1
skagen
AnyKey`щик
 
Аватар для skagen
 
Регистрация: 06.06.2010
Сообщений: 10
Написано 0 полезных сообщений
(для 0 пользователей)
Передвижение картинки

Всем привет.я только новичок в мобильном паскале.учу реадме,но там многого не сказано.например,как сделать так,чтобы выведенная на экран картинка по нажатию софт-клавиши передвигалась в определенную точку?начинаю так:
Program name;
var
I:Image;
begin
I:=LoadImage('/image.png');
DrawImage(I,0,0);
Repaint;
Delay(5000);
end.
это понятно.этой командой выводится на экран картинка.но а что делать дальше?помогите пожалуйста!
__________________
все будет
(Offline)
 
Ответить с цитированием
Старый 25.06.2010, 13:03   #2
Igor
Мастер
 
Аватар для Igor
 
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,218
Написано 438 полезных сообщений
(для 790 пользователей)
Ответ: Проблема с загрузкой изображения

Пусть у картинки будут координаты х,у
drawimage(i,x,y);

При нажатии кнопок изменяешь эти координаты;
заливаешь экран белым цветом;
рисуешь изображение по координатам;
repaint;

P.S. всё это делаешь циклом
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
skagen (25.06.2010)
Старый 25.06.2010, 13:50   #3
skagen
AnyKey`щик
 
Аватар для skagen
 
Регистрация: 06.06.2010
Сообщений: 10
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Передвижение картинки

все это работает,спс.а как сделать цикл?или просто вставлять код?
__________________
все будет
(Offline)
 
Ответить с цитированием
Старый 25.06.2010, 14:06   #4
cherepets
Бывалый
 
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений
(для 215 пользователей)
Ответ: Передвижение картинки

циклы 1в1 как в обычном паскале
(Offline)
 
Ответить с цитированием
Старый 25.06.2010, 14:10   #5
skagen
AnyKey`щик
 
Аватар для skagen
 
Регистрация: 06.06.2010
Сообщений: 10
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Передвижение картинки

ну а я то сразу к мидлету приступил поэтому и не знаю
__________________
все будет
(Offline)
 
Ответить с цитированием
Старый 25.06.2010, 14:25   #6
Igor
Мастер
 
Аватар для Igor
 
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,218
Написано 438 полезных сообщений
(для 790 пользователей)
Ответ: Передвижение картинки

repeat
key:=getkeypressed
...
until key=ke_key0;


повторяется до тех пор, пока не нажмешь ноль

P.S. А вообще, почитай немного про обычный паскаль. Советую изучить массивы, записи и циклы, без них никак.
Ещё бы не мешало разобраться с простейшими алгоритмами сортировки и действиях с массивами.
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо Igor за это полезное сообщение:
Rock2roll (08.07.2010), skagen (25.06.2010)
Ответ


Опции темы

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

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


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


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