Цитата:
|
Сообщение от lmikle
Код:
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]; |
А проще нельзя? Ведь GL_ZERO, GL_ONE, GL_SRC_COLOR - это константы, прописанные, как я уже приводил в первом посте.
Кстати, твой код не катит, пришлось = заменить на :.