* Correction for r2871: less ugly, more efficient code.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2873 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
bigchimp 2013-12-28 16:01:15 +00:00
parent 0368dda4a8
commit f76acb185e

View File

@ -298,7 +298,7 @@ begin
{$IFDEF FPC}
{$IFDEF ENDIAN_LITTLE}
result:=(RGB shl 8); //tags $00 at end for the A byte
result:=NtoBE(LEtoN(result)); //flip byte order
result:=SwapEndian(result); //flip byte order
{$ELSE}
//Big endian
result:=RGB; //leave value as is //todo: verify if this turns out ok