24.08.2011 / 15:41 | |
P@bloid Пользователь Сейчас: Offline
Имя: Павел Откуда: Волгоград Регистрация: 25.02.2010
| Naik, возможно это баг компилятора. дай скомпиленный класс Пост #94291 - и не будет, условие проверяется сразу после вывода helloworld, и естественно является ложным Изменено P@bloid (24.08 / 15:42) (всего 1 раз) |
24.08.2011 / 22:08 | |
Naik Пользователь Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| Вот сама программа, исходник и непреверифецированный класс
Прикрепленные файлы: MegaBALL_jar.rename (55.26 кб.) Скачано 269 раз MegaBALL.mpas (3.31 кб.) Скачано 894 раза FW.class (3.88 кб.) Скачано 568 раз |
25.08.2011 / 20:44 | |
kiriman Пользователь Сейчас: Offline
Имя: Кирилл Откуда: Красноярск Регистрация: 18.01.2010
| |
25.08.2011 / 20:55 | |
Naik Пользователь Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| kiriman, Можешь в *.tхt конвертировать и выложить сюда? (я с телефона в Интернете)
|
25.08.2011 / 21:08 | |
Алиев Пользователь Сейчас: Offline
Имя: Артем Регистрация: 25.08.2011
| Как спрайты использовать?
|
25.08.2011 / 23:12 | |
Naik Пользователь Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| Алиев, Какие спрайты?
|
25.08.2011 / 23:16 | |
P@bloid Пользователь Сейчас: Offline
Имя: Павел Откуда: Волгоград Регистрация: 25.02.2010
| Naik, нашел. Это баг. Пиши имена процедур в нижнем регистре. Я это исправлю, как найду исходники свежие.
|
25.08.2011 / 23:44 | |
Naik Пользователь Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| И еще если писать по-русски, и сохранить код, а затем открыть его, то русские буквы заменяются вопросительными знаками. Можно еще сделать переход к заданной строке. Например нажимаешь # и попадаешь в поле ввода.
|
30.08.2011 / 04:18 | |
Dabann Пользователь Сейчас: Offline
Имя: Дeнис Откуда: Серпухов Регистрация: 06.06.2010
| P@bloid, Help me please В чем тут ошибка? program touchTest;
uses sensor;
var
px,py,w,h,x,y,loop: integer;
begin
sensor.init;
w:=getWidth;
h:=getHeight;
loop:=1;
x:=random(w-32);
y:=random(h-32);
while loop=1 do
begin
setcolor(255,255,255);
fillrect(0,0,w,h);
setcolor(0,0,0);
fillrect(x,y,32,32);
px:=sensor.pointer_pressed_x;
py:=sensor.pointer_pressed_y;
if px>x and py>y and px<(x+32) and py<(y+32) then
begin
x:=random(w-32);
y:=random(h-32);
end;
drawtext('x:'+px,0,0);
drawtext('y:'+py,0,25);
repaint;
end;
end.
Должен рисоваться черный квадрат на белом фоне, по рандомным координатам. При касании его пальцем(на тачфоне, естественно), он перепрыгивает на другое место. Но квадрат не рисуется. Еще должны выводиться координаты точки, куда ткнул, но и их тоже нет. Просто белый экран! Либу подключил, вроде, правильно, пользуюсь ей как надо... ЧеЗаНах? |
30.08.2011 / 14:09 | |
Naik Пользователь Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| Dabann, а я писал всегда fillRect, setColor, drawText. Разве это регистронезависимый язык программирования?
|