Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.02.2009, 17:05   #1
Wi1D
Кибернетик
Форумчанин
 
Аватар для Wi1D
 
Регистрация: 22.10.2008
Сообщений: 142
По умолчанию Таблица ASCI

Вот задание: В окне с помощью клавиш-стрелочек (←, →, ↑, ↓) смоделировать движение курсора (или другого символа)
Как я понял надо с помощью цикла repeat ...until выполнять оператор keypressed чтобы выбирать куда двигать символ, просто изменяя его координаты...
Так вот у меня вопрос...какой код у клавиш "СТРЕЛОК"...
чтобы можно было написать так примерно :
Код:
repeat
.......
if keypressed then
ch:=readkey;
 if ch={а вот тут какой код ставить???ну например для клавиши BACKSPASE '#8' а для СТРКЛОК КАКИЕ КОДЫ?}
.......
until
не существует идеальных программ...и людей тоже..
<== P.S. если я тебе помог нажми весы слева <==
Wi1D вне форума Ответить с цитированием
Старый 08.02.2009, 17:15   #2
начинающий кодер
только учусь!
Форумчанин
 
Аватар для начинающий кодер
 
Регистрация: 08.02.2009
Сообщений: 124
По умолчанию

72 Стрелка вверх
75 Стрелка влево
77 Стрелка вправо
80 Стрелка вниз
«Я знаю, что ничего не знаю, но многие не знают и этого».
начинающий кодер вне форума Ответить с цитированием
Старый 08.02.2009, 17:18   #3
Wi1D
Кибернетик
Форумчанин
 
Аватар для Wi1D
 
Регистрация: 22.10.2008
Сообщений: 142
По умолчанию

Цитата:
Сообщение от начинающий кодер Посмотреть сообщение
72 Стрелка вверх
75 Стрелка влево
77 Стрелка вправо
80 Стрелка вниз
БЛАГОДАРЮ!!!думаю остальное я сделаю!))
не существует идеальных программ...и людей тоже..
<== P.S. если я тебе помог нажми весы слева <==
Wi1D вне форума Ответить с цитированием
Старый 08.02.2009, 17:24   #4
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

На сколько я помню 72 - это клавиша H, 75 - K, 77 - M, 80 - P.
Это не коды стрелок.
Стрелочки будут
← 37;
→ 39;
↑ 38;
↓ 40.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 08.02.2009, 17:26   #5
_Dmitry
Участник клуба
 
Аватар для _Dmitry
 
Регистрация: 02.09.2007
Сообщений: 1,193
По умолчанию

При нажатии стрелок, в буфер клавиатуры записывается два символа: первый - #0, второй - #72, #75, #77, #80 (в зависимости от кнопки). Поэтому код будет следующим:
Код:
ch:=ReadKey; {читаем символ из буфера}
if ch = #0 then {если его код #0}
  begin
    ch:=ReadKey; {то читаем следующий}
    if ch = #75 then .....
  end;
_Dmitry вне форума Ответить с цитированием
Старый 08.02.2009, 17:32   #6
начинающий кодер
только учусь!
Форумчанин
 
Аватар для начинающий кодер
 
Регистрация: 08.02.2009
Сообщений: 124
По умолчанию

37 %
38 &
39 '
40
(
«Я знаю, что ничего не знаю, но многие не знают и этого».
начинающий кодер вне форума Ответить с цитированием
Старый 08.02.2009, 17:32   #7
Wi1D
Кибернетик
Форумчанин
 
Аватар для Wi1D
 
Регистрация: 22.10.2008
Сообщений: 142
Радость

Цитата:
Сообщение от _Dmitry Посмотреть сообщение
При нажатии стрелок, в буфер клавиатуры записывается два символа: первый - #0, второй - #72, #75, #77, #80 (в зависимости от кнопки). Поэтому код будет следующим:
Код:
ch:=ReadKey; {читаем символ из буфера}
if ch = #0 then {если его код #0}
  begin
    ch:=ReadKey; {то читаем следующий}
    if ch = #75 then .....
  end;
оо!!спасибо!
не существует идеальных программ...и людей тоже..
<== P.S. если я тебе помог нажми весы слева <==
Wi1D вне форума Ответить с цитированием
Старый 08.02.2009, 17:34   #8
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Извиняюсь, ошибся... _Dmitry, спасибо за пояснения.
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 08.02.2009, 17:46   #9
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,865
По умолчанию

А если сделать так:
Код:
ch:=ReadKey; {читаем символ из буфера}
if ch = #0 then {если его код #0}
  begin
    ch:=ReadKey; {то читаем следующий}
    WriteLn (Ord (ch));
  end;
То можно узнать код любой клавиши - запустить программу, нажать и увидеть его на экране.
Arigato вне форума Ответить с цитированием
Старый 08.02.2009, 18:31   #10
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Вот пример такой программы. Держу под рукой, когда надо код клавиши, быстро нахожу.
Вложения
Тип файла: rar KEY.rar (3.6 Кб, 44 просмотров)
puporev вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Таблица в C# (не БД) mopozoff Общие вопросы .NET 6 15.11.2015 00:15
таблица тася Microsoft Office Excel 17 25.01.2009 00:29
Таблица Настенька..Блонди Помощь студентам 3 07.01.2009 18:16
таблица artemavd Общие вопросы Delphi 3 23.07.2008 13:56
Таблица frutty Компоненты Delphi 1 07.04.2008 09:29