Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Вниз

Непонятки с консолью   Найти похожие ветки 

 
dreamse   (2006-02-23 08:12) [0]

Пишу консольную утилиту ...



write(Rus("     Опции :"+#13#10+#13#10+
       "     1) Установить программу"+#13#10+#13#10+
       "     2) Сменить тип авторизации "+#13#10+#13#10+
       "     3) Выход")+ #13#10);

 Readln(sline);
 if sline = "3" then exit;



В общем после вывода этих строк нужно выбрать опцию ... например 3 : пользователь вводит 3 и она пишеться на экране , после чего нужно нажимать Enter

Вопрос : каким образом сделать так чтобы буквы не писались на экране при наборе пользователем ( например выбор или пароль )

Вопрос 2 : как сразу же переходить к выбраному пункту меню не нажимаю Enter а выбрав пункт из опций ?


 
Alexandr ©   (2006-02-23 08:18) [1]

вопрос 1 не знаю.
а вопрос 2 - напиши   Read(sline); и обрабатывай посимвольно.


 
dreamse   (2006-02-23 08:54) [2]

> а вопрос 2 - напиши   Read(sline); и обрабатывай посимвольно.

Можно поподробней ? а то что то нечиге не получаеться ... не могу понять как обрабатывать так как символ уже написан


 
Alexandr ©   (2006-02-23 09:18) [3]

ну так символ считал один же. и сразу его анализируй.
т.е. программа то больше и не изменяется, только в данной строке.
или что?


 
Zeqfreed ©   (2006-02-23 10:49) [4]

http://www.delphimaster.ru/articles/console.html



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.03.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.014 c
15-1140175045
Неуверенный
2006-02-17 14:17
2006.03.12
Вставка командной строки в MSDOS


15-1140363861
LexxX
2006-02-19 18:44
2006.03.12
Создание CAB-архива


2-1140616905
veb
2006-02-22 17:01
2006.03.12
Первая попытка подключения к инернету


11-1121177748
kukuks
2005-07-12 18:15
2006.03.12
Пример программы с unicode


2-1140448453
Spieler
2006-02-20 18:14
2006.03.12
Сообщения Windows





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский