1type
2  TPDFLineCap = (lcBuss, lcRound, lcProtecting);

Или

1type
2  TPDFLineCap = TOleEnum;
3const
4  lcBuss = $00000000;
5  lcRound = $00000001;
6  lcProtecting = $00000002;

Элементы перечисления:

Имя	Значение	Назначение
lcBuss	0
lcRound	1
lcProtecting	2