Source position: googlevision.pp line 483
protected procedure TColor.Setalpha(
AIndex: Integer;
const AValue: Integer
); virtual;