здравствуйте эксперты!!! У меня есть такой вопрос. В паскале с помощью оператора Line(x1,y1,x2,y2) можно нарисовать линию, с координатами начала x1,y1 и конца x2,y2.Можно ли сделать так, чтобы паскаль нарисовал линию в замедленном действии (т.е видно как она проходит от начала до конца). P.S Извините за глупый вопрос. Заранее спасибо.
Здравствуйте, van! Сделать все можно. Но и читать тоже надобы .... Пример в приложении. Там все просто, поизменяейте что-либо и разберетесь
Приложение: Ответ отправлен: 19.04.2004, 14:57 Отправитель: Boriss Отвечает sir henry
Добрый день, van! Можно. Если рисовать не сразу линию, а поточечно в цикле. Естественно, с необходимым замедлением, например: Начало цикла PutPixel(x, y, color); Delay(500); Конец цикла; Ответ отправлен: 19.04.2004, 16:19 Отправитель: sir henry Отвечает VOVAN
Добрый день, van! Только по точкам. Ответ отправлен: 19.04.2004, 18:45 Отправитель: Pawel Отвечает Strory
Здравствуйте, van! Не-а, но можно сделать свою процедуру, которая будет медленно рисовать линию :) Что для этого надо? Напишите сначала процедуру, которая будет по двум точкам высчитывать уравнение прямой, т.е. найти в (y = a*x + b) нужные нам "а" и "b". В школах, на сколько я помню, учат решать системы уравнений :) Потом добавьте в эту процедуру возможность поточечно рисовать получившуюся прямую, а потом ещё и Delay поставьте и будет у Вас счастье :))) Ответ отправлен: 19.04.2004, 19:05 Отправитель: Strory Отвечает Tancho
Доброе время суток, van! Это не оператор - это проседура Pascal'я!Вы директно в ее не можете вмешаться! Надо писать свой вариант эту проседуру или чего то подобного. Могу тебе подсказать : 1) Используй процедуру PutPixel для вычертывания линию и проседуру Delay для замедления вычерчивания; 2) Для определения координатый правую линию ползуйся уравнения правой через двух точек - (y-y1)/(x-x1) = (y2-y1)/(x2-x1); А в частном смотри приложение!
Приложение: Ответ отправлен: 21.04.2004, 11:59 Отправитель: Tancho
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.