Source position: googlesafebrowsing.pp line 409
protected procedure TThreatEntrySet.SetcompressionType(
AIndex: Integer;
const AValue: string
); virtual;