Create Test_stringToReal.pas