Corrected bug in delphi xe3 and delphi xe4

this bug cause return empty fields