Добавить собственный стиль класса временных объектов
function AddStyle(PenColor,FillColor,TextColor,BgrTextColor: integer;
PenWidth,FontSize: single; flTransparent,flBgrText: boolean; Units: Byte;
aTag: integer = 0; flForPrintDoc: boolean = false): integer;
PenColor
FillColor
TextColor
BgrTextColor
PenWidth
FontSize
flTransparent
flBgrText
Units
индекс стиля