Выбор и сохранение типа линии
Язык Turbo Pascal позволяет использовать линии различных типов. Язык Turbo Pascal позволяет использовать линии различных типов. Для этого служит процедура, все три параметра которой имеют тип Word Для этого служит процедура, все три параметра которой имеют тип Word SetLineStyle( стиль, шаблон, толщина) SetLineStyle( стиль, шаблон, толщина)
При значении UserBitLn тип линии выбирается по системе битов, которая задается во втором параметре. В противном случае берется стандартная линия для каждого из значений, а второй параметр игнорируется. Использование шаблона для типа линии обеспечивает построение линии из фрагментов по 16 пикселей. Этот шаблон повторяется по всей длине линии. Если в каком –либо бите шаблона записана 1, то это соответствует точке на фрагменте линии, если 0 – то пропуску точки. При значении UserBitLn тип линии выбирается по системе битов, которая задается во втором параметре. В противном случае берется стандартная линия для каждого из значений, а второй параметр игнорируется. Использование шаблона для типа линии обеспечивает построение линии из фрагментов по 16 пикселей. Этот шаблон повторяется по всей длине линии. Если в каком –либо бите шаблона записана 1, то это соответствует точке на фрагменте линии, если 0 – то пропуску точки.
Третий параметр задает толщину линии. Для этого введены две константы: Третий параметр задает толщину линии. Для этого введены две константы: NormWidth=1 – тонкая линия. NormWidth=1 – тонкая линия. ThickWidth =3 – толстая линия. ThickWidth =3 – толстая линия.