* added brga record to get it compiling.

git-svn-id: trunk@9318 -

packages/fcl-image/src/targacmn.pp

@@ -47,6 +47,10 @@ Type
     Blue, Green, Red : Byte;
   end;
 
+  TBGRAEntry = packed record
+    Blue, Green, Red, Alpha : Byte;
+  end;
+
 Function ToWord(AWord : TWordRec) : Word;
 Function FromWord(AWord : Word) : TWordRec;