made smalle changes to TPAddNewPlace