Изменение цвета фона при нажатии кнопки

@Jalise · Регистрация: 10.09.2014

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

Привет всем!)
Такой вопрос - как в Паскале указать на нажатие определенной кнопки на клавиатуре?
Задача проста - если нажимаешь на кнопку Ж цвет фона меняется на желтый, на З - зеленый.
Через команду readkey все делается.
Но вопрос - КАК указать эту кнопку? Что уже не делала, Паскаль вредничает

Он не меняет фоны

Pascal

uses crt;
var c:char;
begin
textbackground(red);
clrscr;
writeln('Nazmi klavishy');
c:readkey;
if readkey = #27 then
textbackground(magenta); readln; clrscr;
if readkey = #9 then
textbackground(green); readln; clrscr;
end.

@Puporev · 28.09.2014, 17:38

Pascal

uses crt;
var c:char;
begin
textbackground(red);
clrscr;
writeln('Нажми клавишу ж/Ж желтый цвет, з/З зеленый цвет, другое выход');
repeat
c:=readkey;
case c of
'ж','Ж':begin
          textbackground(yellow);
          clrscr;
        end;
'з','З':begin
           textbackground(green);
           clrscr;
        end;
else exit
end;
until not (c in ['ж','Ж','з','З']);
end.

@Jalise · 28.09.2014, 22:08 **[ТС]**

Спасибо огромное, все работает!
А можно вопрос - почему нельзя указывать клавиши через код?

@Puporev · 29.09.2014, 07:22

Сообщение от Jalise

почему нельзя указывать клавиши через код?

Почему, можно.

Pascal

case c of
#134,#166:begin{Ж, ж}
          textbackground(yellow);
          clrscr;
        end;
#135,#167:begin {З,з}
           textbackground(green);
           clrscr;
        end;

Но символами понятнее, вы точно помните коды всех символов?

@Jalise 0 / 0 / 0 Регистрация: 10.09.2014 Сообщений: 15
	28.09.2014, 22:08 [ТС]	3
	Спасибо огромное, все работает! А можно вопрос - почему нельзя указывать клавиши через код? 0

	29.09.2014, 07:22

Опции темы

Изменение цвета фона при нажатии кнопки

Решение