Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Прочие вопросы

Прочие вопросы Вопросы не касающиеся программирования (установка, настройка...)

Ответ
 
Опции темы
Старый 16.11.2011, 19:28   #1
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Помогите создать маленькую прогу.

Все привет! Как зделать так чтобы например: Создал комманду 'ок',создал текстовое поле.И теперь так чтобы когда я вводил например пароль 1111 в текст.поле, дальше нажал кнопку 'ок' и после наж.кноп.'ок' выводился текст например' привет'. Задача запрограммировать какие нибудь тексты под пароли.Пример:22-'Земля',33-'марс'. Плис дайте код на ету мини прогу! Буду благодарен.
(Offline)
 
Ответить с цитированием
Старый 16.11.2011, 22:03   #2
Morganolla
Бывалый
 
Аватар для Morganolla
 
Регистрация: 03.12.2008
Адрес: наша раша
Сообщений: 762
Написано 129 полезных сообщений
(для 245 пользователей)
Ответ: Помогите создать маленькую прогу.

В MFC можно такую прогу сделать за полчаса.
__________________
Reality Simulation Games
Core 2 Duo 2,8GHz, RAM 1Gb, ATI R5670 1Gb. WinXP 32
(Offline)
 
Ответить с цитированием
Старый 16.11.2011, 22:06   #3
den
Дэвелопер
 
Аватар для den
 
Регистрация: 13.02.2010
Сообщений: 1,645
Написано 620 полезных сообщений
(для 2,419 пользователей)
Ответ: Помогите создать маленькую прогу.

хоть бы название раздела прочитал, перед тем как отвечать...
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 12:09   #4
Reizel
Задрот
 
Аватар для Reizel
 
Регистрация: 24.07.2009
Адрес: Ивановская область, г. Кинешма
Сообщений: 1,574
Написано 407 полезных сообщений
(для 863 пользователей)
Ответ: Помогите создать маленькую прогу.

Midlet Pascal юзай
__________________
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 19:18   #5
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Спасибо за не за что! Прогу можно за 10мин.написать.Смотря как пичатать.Я знаю что к чему,но до ума недоведу. Не нужно весь код писать,а просто основы прог. Тоесть ты написал в текстовом поле код "111" и тебе выводит текст "ПРИВЕТ".
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 19:24   #6
alexprey
ПроЭктировщик
 
Регистрация: 22.10.2010
Сообщений: 196
Написано 16 полезных сообщений
(для 30 пользователей)
Ответ: Помогите создать маленькую прогу.

if code = '111' then text := 'привет'
Так тебе надо?
__________________
Для меня нет ничего не реального в кодинге, но мне лень
gainOS - прорыв в проектировании ОС на MIDlet Pascal
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 20:19   #7
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Думаю что да.Спасибо аlexpray!
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 20:20   #8
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Благодарю alexprey!
(Offline)
 
Ответить с цитированием
Старый 17.11.2011, 23:52   #9
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Блин никак не получаеться вывести текст, используя пароль.Прога у меня на 18полей. Дайте полний вариант.А то всё компилировал без ошибок,а толку 0.
(Offline)
 
Ответить с цитированием
Старый 18.11.2011, 01:05   #10
alexprey
ПроЭктировщик
 
Регистрация: 22.10.2010
Сообщений: 196
Написано 16 полезных сообщений
(для 30 пользователей)
Ответ: Помогите создать маленькую прогу.

Код в студию, а то я не экстрасенс
__________________
Для меня нет ничего не реального в кодинге, но мне лень
gainOS - прорыв в проектировании ОС на MIDlet Pascal
(Offline)
 
Ответить с цитированием
Старый 18.11.2011, 22:53   #11
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Var field:integer;
ok:command;
text,code: string;
begin
ok:=createCommand('ok',CM_OK,1);
showForm;
field:=formAddTextField('Введите имя','',10,TF_ANY);
addCommand(ok);
while getClickedCommand<ok> do
delay(100);
if code='111' then text:='земля';
showCanvas;
drawText(?,0,0);
repaint;
delay(4000);
end.
(Offline)
 
Ответить с цитированием
Старый 18.11.2011, 22:58   #12
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

?-ето что все варианты перепроб.в drawText.Тоесть и text впис.и code. Наверно не так прогу написал как надо.Я всего лиш нуб(новачок) и не знаю всё,что и как писать.
(Offline)
 
Ответить с цитированием
Старый 18.11.2011, 23:20   #13
FireOwl
Бывалый
 
Аватар для FireOwl
 
Регистрация: 16.09.2009
Адрес: Sun system
Сообщений: 831
Написано 442 полезных сообщений
(для 1,836 пользователей)
Ответ: Помогите создать маленькую прогу.

А где переменная code получает значение?
__________________
N"Gasta! Kvata! Kvakis!
Ahkstas so novajxletero (oix jhemile) so Ranetauw.
(Offline)
 
Ответить с цитированием
Старый 19.11.2011, 18:59   #14
kalashnikov
Оператор ЭВМ
 
Регистрация: 09.09.2011
Сообщений: 34
Написано 0 полезных сообщений
(для 0 пользователей)
Ответ: Помогите создать маленькую прогу.

Короче забыл и запутался.Напишите как следует прогу мне.Плис!
(Offline)
 
Ответить с цитированием
Старый 19.11.2011, 20:55   #15
FireOwl
Бывалый
 
Аватар для FireOwl
 
Регистрация: 16.09.2009
Адрес: Sun system
Сообщений: 831
Написано 442 полезных сообщений
(для 1,836 пользователей)
Ответ: Помогите создать маленькую прогу.

Сейчас местные знатоки все по полочкам разложат. А я - не местный,.. то есть не знаток,.. то есть в мобильниках - ни бум бум.
А переходи на Блитц! Под него документации много, уроков - тьма и возможности у него неплохие. А как освоишься с принципами построения алгоритмов - то и Midlet Pascal и любой другой язык с легкостью разберешь.

Если, конечно, целью стоит научиться программировать, а не написать одну конкретную программу и все.
__________________
N"Gasta! Kvata! Kvakis!
Ahkstas so novajxletero (oix jhemile) so Ranetauw.
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 09:23.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com