Вниз
Скачать: CL | DM;

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

 
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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.024 c
15-1140363861
LexxX
2006-02-19 18:44
2006.03.12
Создание CAB-архива


2-1140535462
zxcv
2006-02-21 18:24
2006.03.12
как освобождать память, выделенную под массив


2-1140689729
-=Dark=-
2006-02-23 13:15
2006.03.12
Ошибка при запуске Delphi


15-1140255258
Pazitron_Brain
2006-02-18 12:34
2006.03.12
Как восстановить почтовую базу Thunderbird?


1-1139185019
VIB
2006-02-06 03:16
2006.03.12
Evaluate expression. Как выполнить выражение из строки??




   Наверх