![]() |
|
Модераторы: volvo877, Snowy, MetalFan |
![]()
|
|
| Aurora |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 1.5.2007 Репутация: нет Всего: нет |
Нужно составить программу управления скоростью точки, движущейся по периметру прямоугольника, управление должно осуществляться клавишами"<",">".
if Keypressed then Begin c:=ReadKey; if c=#60 then Step:=Step+ 100; if c=#62 then Step:=Step-100; end; с клавишами<,> не работает, а если подставить буквы, например #98,#99, то всё нормально. |
|||
|
||||
| Snowy |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: нет Всего: 484 |
А ты подставь '.' и ','
|
|||
|
||||
| Aurora |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 1.5.2007 Репутация: нет Всего: нет |
Как составить алгоритм, (блок-схему) для этой программы, вообще как составлять блок-схемы для графических программ?
|
|||
|
||||
| AlexST |
|
|||
|
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 331 Регистрация: 30.4.2006 Где: Москва Репутация: нет Всего: 3 |
Можно #44 #46
Боооооже... Вас мучают черченьем алгоритмов? Как и для всех остальных |
|||
|
||||
| Aurora |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 1.5.2007 Репутация: нет Всего: нет |
Действительно всё работает когда подставляю #44,#46. Спасибо за помощь.
|
|||
|
||||
![]()
|
| Правила форума "Delphi" | |
|
|
Запрещается! 1. Обсуждать и делится взломанными компонентами или программным обеспечением 2. Публиковать ссылки на варез 3. Оффтопить
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, THandle, Rrader, volvo877. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Object Pascal: кроссплатформенные технологии | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |