Создать GDI объекты собственного стиля
function CreateStyleGDIObjects(sIndex: integer): PTempObjectStyle;
sIndex
nil, если стиль не найден, иначе указатель на структуру стиля