|
Основной форум Сюда все проблемы связанные с программированием. |
14.04.2010, 17:29
|
#16
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
в чем ошибка и обьясните ошибку спасибо
var exit, clicked: Command; img: image; i,key:integer; Begin img:=LoadImage('/image.png'); repeat fillrect(0,0,getwidth,getheight); drawimage(img,0,i); repaint; delay(10); key:=keytoaction(getkeypressed); if key=GA_UP then i:=i-1; if key=GA_DOWN then i:=i+1; until false; begin exit := createCommand('Exit', CM_EXIT, 2); addCommand(exit); repeat delay(100); clicked := GetClickedCommand; until clicked = exit; end.
я хотела сделать кнопку выход
Последний раз редактировалось ViNT, 15.04.2010 в 00:38.
|
(Offline)
|
|
14.04.2010, 18:07
|
#17
|
Знающий
Регистрация: 21.07.2009
Адрес: Украина
Сообщений: 219
Написано 44 полезных сообщений (для 78 пользователей)
|
Ответ: программистам
Вобщем до
exit := createCommand('Exit', CM_EXIT, 2);
addCommand(exit);
repeat
delay(100);
clicked := GetClickedCommand;
until
clicked = exit;
Ты работаеш с canvas а после не вызвав showform перешла на формы
|
(Offline)
|
|
14.04.2010, 20:37
|
#18
|
Бывалый
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений (для 215 пользователей)
|
Ответ: программистам
в теме фотки:
Сообщение от cherepets
if getkeypressed=-7 then halt;
|
ставить по прежнему перед until
|
(Offline)
|
|
15.04.2010, 00:31
|
#19
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
а как например сделать нажимаешь на кнопку на мобильнике н.р на двойку нажимаешь нажимаешь раз пять потом хоп что то происходит ?
например переходит на какой нибуть сайт
|
(Offline)
|
|
15.04.2010, 00:38
|
#20
|
Модератор
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений (для 817 пользователей)
|
Ответ: программистам
Сообщение от www12
а как например сделать нажимаешь на кнопку на мобильнике н.р на двойку нажимаешь нажимаешь раз пять потом хоп что то происходит ?
например переходит на какой нибуть сайт
|
Примерно так:
repeat key:=GetKeyClicked; if key=ke_key5 then begin if i=4 then //требуемое действие i:=i+1; end; if key=ke_key1 then i:=0;//сброс счетчика, если нажата другая кнопка, так для всех кнопок кроме 5 until key=ke_pound;
|
(Offline)
|
|
15.04.2010, 01:04
|
#21
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: программистам
спасибо vint ты такой умничка
а как обозначаеться клавиша вот эта
|
(Offline)
|
|
15.04.2010, 01:40
|
#22
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: программистам
сама догнала всем спасибо
особенно vint
|
(Offline)
|
|
03.05.2010, 18:39
|
#23
|
Мастер
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,218
Написано 438 полезных сообщений (для 790 пользователей)
|
Ответ: программистам
Идея гениально проста: на оба телефона ставишь icq, на втором в настройках ставишь, чтобы при входящих сообщениях вибрировал.
Потом с первого на второй что-нибудь посылаешь, второй секунды 2-3 вибрирует.
Подойдет?
|
(Offline)
|
|
03.05.2010, 19:09
|
#24
|
Элита
Регистрация: 14.06.2008
Адрес: Украина, Киев
Сообщений: 2,273
Написано 754 полезных сообщений (для 1,833 пользователей)
|
Ответ: программистам
#1, мою идею украли
|
(Offline)
|
|
03.05.2010, 20:58
|
#25
|
Нуждающийся
Регистрация: 12.04.2010
Сообщений: 52
Написано одно полезное сообщение
|
Ответ: программистам
эта идея проста как мир я ж не дура просить программистов о такой программе
если есть ася
|
(Offline)
|
|
25.08.2010, 17:21
|
#26
|
ПроЭктировщик
Регистрация: 31.01.2010
Адрес: Россия, респ. Башкортостан, г. Бирск
Сообщений: 137
Написано 12 полезных сообщений (для 17 пользователей)
|
Ответ: программистам
Вот вибратор. Jimm сама скачаешь где нибудь)
А если серьёзно, то версия будильника на агенте ближе всех к истине. Для этого придётся использовать сторонний сервер или особенное сообщение, но всему кл придётся раздать мидлет, чтобы работало. Были бы исходники jimm'а тогда слелать легко(с декомпиляторами не знаком), или же придётся изучать протокол icq и писать совершенно новый клиент.
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 08:59.
|