|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
30.03.2008, 14:58 | #1 |
Новичок
Джуниор
Регистрация: 13.10.2007
Сообщений: 2
|
Определение сканкода нажатой клавиши
В паскале, для определения сканкода нажатой клавишииспользуется функция ReadKey. Какаю функцию использовать для этого в Delphi, при создании консольного приложения?
И какие процедуры использовать для: Задания цвета фона, цвета символа, очистки экрана? Например, как написать вот такую программу в дельфи: Код:
Последний раз редактировалось Stilet; 01.07.2009 в 13:41. |
31.03.2008, 14:21 | #2 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
Есть модуль CRT32 (где взял, не помню), в нем процедуры и функции, аналогичные CRT, но для консоли в Delphi.
|
05.12.2008, 18:17 | #3 |
Новичок
Джуниор
Регистрация: 05.12.2008
Сообщений: 1
|
У мну проблема, подключаю этот модуль и половина русскиз букв исчезает. Что то можно сделать?
|
05.12.2008, 18:54 | #4 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
|
05.12.2008, 19:41 | #5 |
Участник клуба
Регистрация: 12.08.2008
Сообщений: 1,977
|
События KeyUp и KeyDown в переменной Key возвращают код клавиши, а событие KeyPress в переменной Key содержат символ, соответствующий нажатой клавиши( с учетом раскладки и регистра).
Для получения кода символа - code simbol(integer) := ORD(Key)
И не сомневайся даже ... отдых - кайф, работа - лажа!
|
07.01.2009, 05:30 | #6 | |
Регистрация: 07.01.2009
Сообщений: 2
|
Цитата:
Целый Вечер "Вспоминал Молодость" Пытался в "Старом Паскалевском Стиле" Написать Консольное Приложение под Delphi. Мнда. Delphi - 7ой версии. Как Мало Они Оставили от Старого Паскаля. Уже Пол Инета Перерыл В Поисках Подобного Модуля. Уже Хотел Ругаться Типа "Сплошная попса..." На Всех (десятки) страниц, при описании консольных Приложений Одна и таже копия статьи содержащая описание Write, WriteLn, Read, ReadLN... Как Серьёзный Вопрос Встанет Так Инет Безсилен... Ан Нет... Дал Правильный Запрос... (Загрузил DOSовский Паскаль, Вспомнил название Функции ReadKey) И Оказался на этой Страничке. Тот Модуль, Что Ты Выложил - Просто ЧУДО! СпасиБО! Еще Раз ОГРОМНОЕ СПАСИБО! |
|
07.01.2009, 08:25 | #7 | |
Регистрация: 07.01.2009
Сообщений: 2
|
Вообщем часов 12 поисков.
По-моему нашел. Для Интересующихся Консольными приложениями. Тут (по-моему) есть все и По-человечески http://www.silicontaiga.ru/home.asp?artId=5757 Цитата:
Но(!) для приложений с Формами. В Консольных Приложениях Uses Forms; не используются.... Последний раз редактировалось Stilet; 01.07.2009 в 15:48. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нажатие клавиши | format | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 1 | 05.05.2008 15:25 |
Клавиши | RealSHELS | Общие вопросы Delphi | 3 | 27.03.2008 22:32 |
Клавиши | xakkkkker | Общие вопросы Delphi | 1 | 23.03.2008 10:45 |
Как заиндовать клавиши | Ermak | Win Api | 4 | 15.06.2007 08:41 |
Код клавиши... | =*=|/|MM0PT@/\=*= | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 19.01.2007 13:10 |