Зарегистрироватся
Авторизироваться
Новые сообщения Правила форума Поиск
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: ADMIN, Nextik  
Форум » MidletPascal » Игроделам! » Как сделать приближение и удоление картинки ?
Как сделать приближение и удоление картинки ?
20.02.2009 в 13:51 Сообщение #1
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 Вот картинка если кто знает помогите !
Прикрепления: 3058176.gif (24.9 Kb)
20.02.2009 в 13:59 Сообщение #2
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 Может каие либы нужны ?
20.02.2009 в 14:00 Сообщение #3
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 Или так нельзя в MP ?
20.02.2009 в 14:02 Сообщение #4
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 cry блин как сделать.......
20.02.2009 в 14:12 Сообщение #5
Rumata
Программист
Проверенные
Сообщений: 325
Награды: 0
Репутация: 43
Offline
 Хм... Я не знаю. Это довольно интересно... Можно будет попробовать.
20.02.2009 в 14:47 Сообщение #6
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 Да
20.02.2009 в 14:50 Сообщение #7
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 А можно сделать чтобы изооброжение не теряло качество ?
20.02.2009 в 14:50 Сообщение #8
DaNN
Программист
Проверенные
Сообщений: 356
Награды: 0
Репутация: 4
Offline
 Кто знает по этому что небуть пишите ?
20.02.2009 в 20:06 Сообщение #9
admin
Admin
Администраторы
Сообщений: 244
Награды: 2
Репутация: 594
Offline
 На те пример. Нужна либа canvas, я ее кинул. Будут вопросы по коду - спрашивай
2,8 4, 6 - передвижение картинки
1,3 - увелечение и уменьшение
Прикрепления: Tema.zip (34.6 Kb)
15.09.2010 в 15:35 Сообщение #10
Edelon
Удаленные
 зачем так сложно?
Code
if key = KE_key2 then  Y := Y - 3 else
if key = KE_key8 then   Y := Y + 3 else  
if key = KE_key4 then   x := x - 3 else  
if key = KE_key6 then   x := x + 3;

может проще так?
Code
if key = KE_key2 then  Y := Y - 3;
if key = KE_key8 then   Y := Y + 3;  
if key = KE_key4 then   x := x - 3;
if key = KE_key6 then   x := x + 3;

или это чтоб не опрашивать другие клавиши в случае сопоставления?
Форум » MidletPascal » Игроделам! » Как сделать приближение и удоление картинки ?
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск: