OpenGL в Delphi
Теперь тестовая деталь выглядит более реалистично
В этом примере интересно то, как при некоторых положениях детали ее грани отсвечивают слабым фиолетовым оттенком.
Массив свойств материала детали содержит небольшую составляющую красного, чем больше это число (до некоторых пределов), тем выразительнее будет выглядеть деталь:
MaterialColor: Array [0..3] of GLfloat = (0.1, 0.0, 1.0, 1.0);
Как правило, по ходу работы приложения требуется менять текущие свойства материала, как это делается в проекте из подкаталога Ех07. На экране вращается кубик, "проткнутый" тремя цилиндрами (Рисунок 4.3).
