Source position: tos.pas line 179
procedure VsetRGB(
index: SmallInt;
count: SmallInt;
xrgbArray: array of TRGB
);