Изображение.ИсходнаяШирина (Image.NaturalWidth) Свойство

Копировать     Выделить всё

Перем ДФ;
Перем Изображение1;

Процедура Свойство() Экспорт
	Сообщить("Изображение1.ИсходнаяШирина = " + Изображение1.ИсходнаяШирина);
	Сообщить("Изображение1.ИсходнаяВысота = " + Изображение1.ИсходнаяВысота);
КонецПроцедуры

Процедура Форма1_Загружена() Экспорт
	ДФ.ПолучитьСвойство(Изображение1, "ИсходнаяШирина", ДФ.Действие(ЭтотОбъект, "Свойство"));
	ДФ.ПолучитьСвойство(Изображение1, "ИсходнаяВысота", ДФ.Действие(ЭтотОбъект, "Свойство"));
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\DeclarativeForms\DeclarativeForms\bin\Debug\DeclarativeForms.dll");
ДФ = Новый ДекларативныеФормы();
Форма1 = ДФ.Форма;
Форма1.Загружена = ДФ.Действие(ЭтотОбъект, "Форма1_Загружена");
Форма1.НачальнаяШирина = 400;
Форма1.НачальнаяВысота = 300;

Изображение1 = Форма1.ДобавитьДочерний(ДФ.Изображение());
Изображение1.Источник = "file:///C:/444/~Деклар Форма/maslenica10.jpg";
Изображение1.Стиль.Ширина = 119 * 2;
Изображение1.Стиль.Высота = 80 * 2;

Форма1.Открыть();