10.12.2009, 23:16
|
|
Модератор
|
|
Регистрация: 17.04.2008
Сообщения: 8,100
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
|
|
Код:
const
CValues = Array [0..4] Of Integer = (GL_ZERO, GL_ONE, GL_SRC_COLOR, GL_ONE_MINUS_SRC_COLOR, GL_SRC_ALPHA);
...
BlendSFactor := CValues[RadioGroup1.ItemIndex]; |