Source position: agraphics.pas line 2012
procedure LoadRGB4(
Vp: PViewPort;
Colors: PWord;
Count: LongInt
);