Главная страница
    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.013 c
2-1140698392
macpm
2006-02-23 15:39
2006.03.12
Печать содержимого PaintBox


15-1140363552
Cerberus
2006-02-19 18:39
2006.03.12
Помогите выбрать мобилу.


2-1140456167
МегаПупс
2006-02-20 20:22
2006.03.12
Видео плеер


2-1140508450
Сенокур Петя
2006-02-21 10:54
2006.03.12
Image.Picure.LoadFromFile почему падает?


6-1132861630
Николай2005
2005-11-24 22:47
2006.03.12
Ошибка 411 при отправке запроса через TIdHTTP методом POST





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский