|
Основной форум Сюда все проблемы связанные с программированием. |
14.05.2010, 08:37
|
#1
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Помогите с boolean!!!
Прошу помочь! Я знаю что более нормальная программа работает при использовании булеанов. Тоесть
procedure Init;
begin
...
end;
procedure h;
begin
init:=true;
end;
В чём вопрос? У меня подобное компилит без проблем, но на эмуляторе и телефоне тупо вылетает. Я буду очень благодарен если мне обьяснят как осуществить:
1) Прорисовка картинки)
2) При нажатии на обьект (к примеру) иконку, init=true;
3) Init "живёт", пока не нажмут на что-то другое. Заранее спасибо.
|
(Offline)
|
|
14.05.2010, 09:54
|
#2
|
Дэвелопер
Регистрация: 04.09.2005
Адрес: Красноярск
Сообщений: 1,376
Написано 491 полезных сообщений (для 886 пользователей)
|
Ответ: Помогите с boolean!!!
Пиши на j2me, тогда подскажу.:p
|
(Offline)
|
|
14.05.2010, 10:02
|
#3
|
Бывалый
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений (для 215 пользователей)
|
Ответ: Помогите с boolean!!!
эм, компилиться???
инит - процедура, ты ей присваиваешь тру и оно компилится???
полный бред...
var init:boolean;
т.е. просто переменную создаем, процедуре нельзя ниче присвоить
|
(Offline)
|
|
14.05.2010, 22:08
|
#4
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Помогите с boolean!!!
Нет, это не то. Вот код:
Program test;
Var intro, paint:boolean;
procedure intro;
begin
прорисовка картинки;
ожидание нажатия на координаты;
{при нажатии на нужные координаты paint=true};
procedure paint;
begin
прорисовка картинок;
delay(-1);
end;
Procedure data;
begin
intro:=true;
paint:=false;
end;
Procedure intro;
Begin
data;
end.
Что тут неправильно???
__________________
G502, GT S5230w user!
|
(Offline)
|
|
14.05.2010, 22:40
|
#5
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
delay(-1); Улыбнуло
__________________
|
(Offline)
|
|
14.05.2010, 22:55
|
#6
|
|
Ответ: Помогите с boolean!!!
хм, кто-то откроет для себя что у программ есть главный цикл ?
|
|
|
14.05.2010, 23:06
|
#7
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Помогите с boolean!!!
люди...мне кто-то поможет???
__________________
G502, GT S5230w user!
|
(Offline)
|
|
14.05.2010, 23:07
|
#8
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
Во первых ты куда-то дел главный цикл + у тебя 2 раза повторяется процедура intro + количество end-ов не совпадает с количеством begin-ов + delay (-1) уже само собой должно насторожить, ты пытаешься сказать программе чтобы она ждала -1 секунду (вообщем эта строчка чоть и откомпилится но будет запорывать твою программу)
__________________
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
14.05.2010, 23:09
|
#9
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Помогите с boolean!!!
но прога компилится...а в приложении белый экран..=(
__________________
G502, GT S5230w user!
|
(Offline)
|
|
14.05.2010, 23:10
|
#10
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
нет она не компилится
__________________
|
(Offline)
|
|
14.05.2010, 23:14
|
#11
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Помогите с boolean!!!
Я 1 энд тут не дописал. Но у меня в исходнике есть. Что за цикл? И ещё...ты почем на свой сайт не заходишь?
__________________
G502, GT S5230w user!
|
(Offline)
|
|
14.05.2010, 23:17
|
#12
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
Захожу, смотрю кто что написал, ты первый кто что-то написал вообще
__________________
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
14.05.2010, 23:19
|
#13
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
Program test;
Var intro, paint:boolean;
procedure p_intro;
begin
прорисовка картинки;
ожидание нажатия на координаты;
{при нажатии на нужные координаты paint=true};
end;
procedure p_paint;
begin
прорисовка картинок;
delay(1000);
end;
Procedure data;
begin
intro:=true;
paint:=false;
end;
Begin
data;
end.
__________________
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
14.05.2010, 23:26
|
#14
|
Знающий
Регистрация: 14.05.2010
Сообщений: 297
Написано 13 полезных сообщений (для 13 пользователей)
|
Ответ: Помогите с boolean!!!
Слушай! Огромное спасибо! Я тебя не забуду хД Я хочу тебе помочь с сайтом и прогой! Если есть время давай займемся серьёзно этим! Ещё рас спасибо!
__________________
G502, GT S5230w user!
|
(Offline)
|
|
14.05.2010, 23:44
|
#15
|
ПроЭктировщик
Регистрация: 21.06.2009
Адрес: Беларусь, Столбцы
Сообщений: 148
Написано 32 полезных сообщений (для 57 пользователей)
|
Ответ: Помогите с boolean!!!
Пиши в личку
__________________
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 12:39.
|