Source position: agraphics.pas line 2510
procedure SetRGB4(
vp: pViewPort;
index: LongInt;
red: ULONG;
green: ULONG;
blue: ULONG
);