Текущий архив: 2004.04.11;
Скачать: CL | DM;
Вниз
Использование директивы absolut Найти похожие ветки
← →
pasha_golub © (2004-04-23 14:10) [0]Есть процедура:
procedure VGradientFill(ACanvas: TCanvas; ARect: TRect;
FromColor, ToColor: TColor);
var
FC: array [0..3] of byte absolute FromColor;
TC: array [0..3] of byte absolute ToColor;
...
Массивы FC, TC объявлены для удобства. Потому как в процедуре часто идет доступ непосредственно к каждому компонту цвета (RGB).
Однако, имеется мнение (не мое), что такая конструкция плохо переносится на последующие версии и плохо читаема.
1. Попрошу объяснить так ли это? Желательно с цитатами из хелпа 7 или 8 версии.
2. Какйо подоход ближе вам:
а) через асболют
б) через
type
TMixedType = packed record
case boolean of
False: {Color: TColor);
True: {R,G,B,Ext: byte};
end;
в) либо танцы с shr & shl
Спасибо
← →
Тимохов © (2004-04-23 14:12) [1]1.вряд ли смогу
2.в)+and
← →
Palladin © (2004-04-23 16:34) [2]1 частично так... директива absolute является unsafe, и скорее всего упразднена в d8
2 case в record тоже является unsafe, но скорее всего вру, лучьше почитать первоисточник
танцы надежней
← →
pasha_golub © (2004-04-26 11:37) [3]Спасибо, но цитаты из хелпа были бы интересней.
Страницы: 1 вся ветка
Текущий архив: 2004.04.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.033 c
