Справка писал(а):
Pen.Style – стиль линии. Принимает следующие значения.
psSolid – сплошная линия
psDash – штриховая линия
psDot – пунктирная линия
psDashDot – штрих-пунктирная линия
psDashDotDot – тире-две точки
(стр.36 *.pas -- pen := CreatePen(PS_SOLID, Round((fScale.x + fScale.y) * ReadIn..... замените на PS_DOT
А если упросить nesco, он может ввести свойство на вид линии

