function VarToWideStrDef(const V: Variant; const ADefault: WideString): WideString;

TntSysUtils

This is function TntSysUtils.VarToWideStrDef.