Установка стилей конца строки для холста. LineTo

Есть ли любой способ установить стиль для lineends для TCanvas. Метод LineTo? Это, кажется, принимает значение по умолчанию к округленным концам, который выглядит очень плохо для нескольких строк подряд различных цветов когда Pen. Ширина установлена на большое значение (например, 9).

Это похоже на это (округленные концы):

 ********........******
**********........******
**********........******
 ********........******

(где *, например, синий и. является желтым),

Это еще хуже, если две внешних линии проведены после средней строки:

 ********........******
**********......********
**********......********
 ********........******

Я хотел бы, чтобы это было похоже на это (прямые концы):

 ********........******
 ********........******
 ********........******
 ********........******

Перо, кажется, не предлагает установки для этого, и ни один не делает метод LineTo. Существует ли, возможно, API-функция окон, которую я мог назвать?