procedure SetAsVariant(const Value: Variant); virtual;
virtual __fastcall SetAsVariant(const Variant Value);
This is SetAsVariant, a member of class TField.