Тема: Canvas
Показать сообщение отдельно
  #1  
Старый 27.05.2013, 23:33
MadFatCat MadFatCat вне форума
Прохожий
 
Регистрация: 25.03.2013
Сообщения: 7
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Canvas

В четырех строках ввода (Edit) ввести координаты двух угловых вершин
прямоугольника, его стороны параллельны кроме формы. Генератором случайных чисел сгенерировать 1000 случайных точек. Те из них, которые попадут мимо прямоугольника, отображать синим цветом, те, что внутрь прямоугольника - лимонным, на границы прямоуголольника - красным. По окончании "обстрела" вывести в надписи (Label) сколько точек попало в прямоугольник, сколько на его границы, сколько не попало в прямоугольник.
Ответить с цитированием