|
Основной форум Сюда все проблемы связанные с программированием. |
13.04.2010, 18:49
|
#16
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
нихочу я рисовать в паинте стрелочки
как сделать чтобы картинка опускалось вниз
и было бы написанна в правом нижнем углу мобильника что это вниз
что написать
ну подскажите блондинке а то уже голова болит все читать в гугле да и толком там ни че нет
т.е в левом углу
|
(Offline)
|
|
13.04.2010, 19:55
|
#17
|
Дэвелопер
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений (для 1,985 пользователей)
|
Ответ: фотки
Как в гугле ничего нет?
Посмотрел - действительно пустовато.
Народ скиньте девушке ссылку на русский базовый туториал по MidletPascal
|
(Offline)
|
|
13.04.2010, 20:44
|
#18
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
русский help вы про это говорите у меня он есть тож не че не понятно
напишите кому не трудно
|
(Offline)
|
|
13.04.2010, 20:57
|
#19
|
Дэвелопер
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений (для 1,985 пользователей)
|
Ответ: фотки
Если ничего не понятно в хелпе - учи школьные учебники по Turbo Pascal, после чего поймешь. Иначе - забудь о программировании. Без труда не выловишь и рыбку из пруда. Ещё можно заплатить кому-то денег и он сделает за тебя. Ну просто не дело когда спрашиваешь элементарные вещи которые можно объяснить даже без знания языка.
|
(Offline)
|
|
13.04.2010, 21:33
|
#20
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
спасибо за совет поступлю так
а мидлет паскаль и Turbo Pascal это одно и тоже
тоже новерное элементарный вопрос я наверное дура
|
(Offline)
|
|
13.04.2010, 23:09
|
#21
|
Дэвелопер
Регистрация: 04.11.2009
Адрес: Украина, Днепропетровск
Сообщений: 1,480
Написано 662 полезных сообщений (для 1,985 пользователей)
|
Ответ: фотки
а мидлет паскаль и Turbo Pascal это одно и тоже
|
Это не одно и то же, это Паскаль). Как Русский и Украинский языки. Оба словянские - говоришь на русском, значит можешь и на украинском и наоборот. В то же время у обоих этих языков есть свои особенности без которых сильно и не поговоришь. С Turbo и Midlet Паскалями та же ситуация.
|
(Offline)
|
|
14.04.2010, 11:04
|
#22
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
не поняла все таки не одно и тоже а где взять литературу по мидлет паскалю
p.s я русская но украинский язык я не знаю вообще
|
(Offline)
|
|
14.04.2010, 11:41
|
#23
|
Бывалый
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений (для 215 пользователей)
|
Ответ: фотки
www12, он о том что на украине и так бы тебя поняли.
http://mobilepascal.ru/ раздел статьи
|
(Offline)
|
|
14.04.2010, 13:24
|
#24
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
помогите сделать кнопку вниз
program Map;
const step = 8;
var
x,y,key,i,j,hi,wi:integer;
imm : image;
begin
y:=0; x:=0;
imm:=loadImage('/map.jpg');
i:=GetImageHeight(imm);
j:=getImageWidth(imm);
wi:=GetWidth;
hi:=GetHeight;
repeat
key:=KeyToAction(GetKeyPressed); Delay(30);
if (key = GA_DOWN) and (y-step>=hi-i) then y:=y-step;
if (key = GA_UP) and (y+step<=0) then y:=y+step;
if (key = GA_RIGHT) and (x-step>=wi-j) then x:=x-step;
if (key = GA_LEFT) and (x+step<=0) then x:=x+step;
DrawImage(imm, x, y);
repaint; delay(20);
until false;
end.
|
(Offline)
|
|
14.04.2010, 13:24
|
#25
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
а не жостикам
|
(Offline)
|
|
14.04.2010, 14:09
|
#26
|
Мастер
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений (для 713 пользователей)
|
Ответ: фотки
Сообщение от www12
а не жостикам
|
Можно джойстиком, можно цифровыми кнопками:
Program Map; const step = 8; var x, y, key, key2, i, j, hi, wi: integer; imm : image; rep: boolean; begin y:=0; x:=0; imm:=loadImage('/icon.png'); i:=GetImageHeight(imm); j:=getImageWidth(imm); wi:=GetWidth; hi:=GetHeight; rep:=true;
repeat
key2:=GetKeyPressed; key:=KeyToAction(key2); Delay(20); if (key2 = 50) then key:=GA_UP; if (key2 = 52) then key:=GA_LEFT; if (key2 = 54) then key:=GA_RIGHT; if (key2 = 56) then key:=GA_DOWN; if (key = GA_DOWN) and (y < hi - step - i) then begin y:=y+step; rep:=true; end; if (key = GA_UP) and (y > 0) then begin y:=y-step; rep:=true; end; if (key = GA_RIGHT) and (x < wi - step - j) then begin x:=x+step; rep:=true; end; if (key = GA_LEFT) and (x > 0) then begin x:=x-step; rep:=true; end;
if (rep) then begin SetColor(255, 255, 255); FillRect(0, 0, wi, hi); DrawImage(imm, x, y); repaint; rep:=false; end;
until false; end.
|
(Offline)
|
|
14.04.2010, 14:36
|
#27
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
я наверное ни так вырожаюсь че мне надо ладно попробую так
I it is necessary was an arrow downwards and picture moved and was written adown that downwards
|
(Offline)
|
|
14.04.2010, 14:53
|
#28
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Ответ: фотки
Что-то совсем непонятно...
Может имеется ввиду рисование кнопок на сенсорном экране и перемещение при их нажатии?
|
(Offline)
|
|
14.04.2010, 15:11
|
#29
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: фотки
vint
вот как мне надо
|
(Offline)
|
|
14.04.2010, 19:01
|
#30
|
Мастер
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений (для 713 пользователей)
|
Ответ: фотки
Пора открывать раздел форума "Чего хочет женщина" и там гадать чего же ей действительно надо. Жаль, что штатных телепатов тут нет.
|
(Offline)
|
|
Эти 2 пользователя(ей) сказали Спасибо odd за это полезное сообщение:
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 01:39.
|