В паскаль abc как нарисовать линию в виде точек?
в паскаль abc как нарисовать линию в виде точек?
Что не так?
Program SetLineStyle;
uses graphabc;
Procedure line(x1,y1,x2,y2: integer);
Procedure SetLineStyle(LineStyle : Word; Pattern : Word; Thickness : Word);
begin
X1 := 100;
Y1 := 100;
X2 := 200;
Y2 := 200;
line(x1,y1,x2,y2);
SetLineStyle (DashedLn, 0, ThickWidth);// штрих-пунктирная утолщенная
end.
По дате
По рейтингу
Короче =)
В комментах надоело ошибки писать.
P.S: Если только из точек соотв. DashStyle.Dot
а этот код что выводит?
и мне кажется СПЕРВА нужно установить тип линии, а потом рисовать
поменяйте местами line и setlinetype
Больше по теме