procedure LineTo(X, Y: Integer) 

Рисует на канве прямую линию, начинающуюся с текущей позиции пера и кончающуюся указанной точкой.

Метод LineTo рисует на канве прямую линию, начинающуюся с текущей позиции пера и кончающуюся точкой (X, Y), исключая саму точку (X, Y). Текущая позиция пера PenPos перемещается в точку (X, Y). При рисовании используются текущие установки пера Pen.