Начиная с XE7 надо ставить &, и у TValue есть шаблон генерации по типу. Вот так работает в Berlin:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
_di_IFMXClipboardService Intf;
if (TPlatformServices::Current->SupportsPlatformService(__uuidof(IFMXClipboardService), &Intf))
{
Intf->SetClipboard(TValue::From<String>(""));
}
}