Завершить цикл по нажатию Enter

@ЗлОй ПрОграММер · Регистрация: 08.02.2010

Author24 — интернет-сервис помощи студентам

НеЛп Ми!!!, Я делаю прогу которая будет читать символы из буфера клавиатуры (ReadKey) остановить чтение нужно по нажатию Enter, все символы записываються в массив символов, и ещё подскажите пожалуйста как сделать чтобы нажатие клавиши backSpace игнорировалось

@Law[L]esS · 27.02.2010, 16:12

Pascal

var 
 ch:char;
 a:array[1..100] of char;
 c:integer;
begin
 repeat
   ch:= readkey;
   inc(c);
   a[c]:= ch;
 until(ch = #13);

@ЗлОй ПрОграММер · 27.02.2010, 16:17 **[ТС]**

Спасибо,)) а подскажите код клавиши BackSpace ? а то я не могу найти в нете

Добавлено через 1 минуту
все спасиб не надо, я нашёл

@ЗлОй ПрОграММер 9 / 9 / 2 Регистрация: 08.02.2010 Сообщений: 148
		1
	Завершить цикл по нажатию Enter 27.02.2010, 16:10. Показов 8224. Ответов 2 Метки нет (Все метки) НеЛп Ми!!!, Я делаю прогу которая будет читать символы из буфера клавиатуры (ReadKey) остановить чтение нужно по нажатию Enter, все символы записываються в массив символов, и ещё подскажите пожалуйста как сделать чтобы нажатие клавиши backSpace игнорировалось 0

@ЗлОй ПрОграММер 9 / 9 / 2 Регистрация: 08.02.2010 Сообщений: 148
	27.02.2010, 16:17 [ТС]	3
	Спасибо,)) а подскажите код клавиши BackSpace ? а то я не могу найти в нете Добавлено через 1 минуту все спасиб не надо, я нашёл 0

Завершить цикл по нажатию Enter

Решение