Использование процедуры ЗаполнитьЗначенияСвойств()