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