HiAsm

Ответов: 9906

Рейтинг: 351

#1: 2007-05-12 17:55:46 ЛС | профиль | цитата

Кстати, гораздо правильней вообще выкинуть этот бред, и использовать всегда так,

function GetLightColor(Color: TColor; Light: Byte) : TColor;
var fFrom: TRGB;
begin
  PColor(@FFrom)^ := Color2RGB(Color);
...

Не виноват я, что ObjectPascal не умеет инлайнить
Супер-язык, блин...

карма: 9