Перевод цвета из TColor в OpenGL

Советы » Цвета и Палитра » Перевод цвета из TColor в OpenGL

{ **** UBPFD *********** by delphibase.endimus.com ****
>> Перевод цвета из TColor в OpenGL

Зависимости: нет
Автор:       Gua, fbsdd@ukr.net, ICQ:141585495, Simferopol
Copyright:
Дата:        03 мая 2002 г.
***************************************************** }

procedure

ColorToGL(c: TColor; var

R, G, B: GLFloat); begin

R := (c mod

$100) / 255; G := ((c div

$100) mod

$100) / 255; B := (c div

$10000) / 255; end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com