repeat
SetColor(White);
Line(10, 10, 20, 10);
Delay(1000);
SetColor(Black);
Line(10, 10, 20, 10);
Delay(1000);
...
until KeyPressed;
Имитация движения курсора в графических режимах
Помогите написать программу на Паскале, имитирующую движение курсора в графическом режиме!!!!!!!!:confused:
Что именно не получается ? Запустить паскаль ?? :-D
делаешь цикл, в нем рисуешь линию белым цветом (можешь любой другой) ставишь delay(1000), далее на том же месте рисуешь ту же линию только черного цвета или цвета фона (так даже правильнее будет), ставишь опять delay(1000) и все повторяешь заново.
выглядит примерно так:
я в самом паскале давано не программировал, название функций точно не помню, но по моему правильно.
выглядит примерно так:
Код:
я в самом паскале давано не программировал, название функций точно не помню, но по моему правильно.
Спасибо тебе!!!!!! но мне нужно программу которая пр нажатии клавиш вперед, вверх, вправо и влево - на экране курсор двигался соответственно!!!!!!!
нет!!!!!!! программу написать!!!!!!!!
нет!!!!!!! программу написать!!!!!!!!
Таки Mike был прав - среду разработки не удалось запустить...
Цитата: Комаджу
Таки Mike был прав - среду разработки не удалось запустить...
Ага, его ещё и правилам этикета не учили, всё время кричит "!!!!!!!!!".