Initial submission of Delphi XE4 code for the property cross project.

Initial submission of Delphi XE4 code for the property cross project.