Диалог = Новый ДиалогВыбораЦвета; 
Если Диалог.Выбрать() Тогда 
	ВыбранныйЦвет = Диалог.Цвет; 
КонецЕсли; Диалог = Новый ДиалогВыбораШрифта; 
Если Диалог.Выбрать() Тогда 
	ВыбранныйШрифт = Диалог.Шрифт; 
КонецЕсли;