OLE颜色指什么，和RGB、24位索引颜色的转换关系
OLE颜色指什么，和RGB、24位索引颜色的转换关系下面的true提的是24位索引颜色吗;-----------------------------------------
(defun zg-OLE->True (OLE)
(+
(lsh (lsh (lsh (fix OLE) 24) -24) 16)
(lsh (lsh (lsh (fix OLE) 16) -24)8)
(lsh (lsh (fix OLE)8) -24)
)
)
(defun zg-True->OLE (Index)
(+
(lsh (lsh (fix Index)8) -24)
(lsh (lsh (lsh (fix Index) 16) -24)8)
(lsh (lsh (lsh (fix Index) 24) -24) 16)
)
)
页:
[1]