ОкноСообщений (MessageBox) Конструктор

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

Перем ДФ, ОкноСообщений1;

Процедура Кнопка1_Нажатие() Экспорт
	ОкноСообщений1.Текст = "Пела ночью мышка в норке:" + Символы.ПС + 
	"- Спи, мышонок, замолчи!" + Символы.ПС + 
	"Дам тебе я хлебной корки" + Символы.ПС + 
	"И огарочек свечи." + Символы.ПС + 
	"";
	ОкноСообщений1.Интервал = 5000;
	ОкноСообщений1.Позиция = Неопределено;
	ОкноСообщений1.Показать();
КонецПроцедуры

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

Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "Ещё сообщение";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

ОкноСообщений1 = ДФ.ОкноСообщений();
ОкноСообщений1.Текст = "В декабре, в декабре 
|Все деревья в серебре.
|Нашу речку, словно в сказке, 
|За ночь вымостил мороз, 
|Обновил коньки, салазки, 
|Елку из лесу привез.
|";
ОкноСообщений1.Высота = 150;
ОкноСообщений1.Ширина = 450;
ОкноСообщений1.Заголовок = "Самуил Маршак";
ОкноСообщений1.Интервал = -1;
ОкноСообщений1.ЦветФона = ДФ.Цвет.СерыйШифер;
ОкноСообщений1.ЦветЗаголовка = ДФ.Цвет.СветлоСиний;
ОкноСообщений1.ЦветТекстаЗаголовка = ДФ.Цвет.Синий;
ОкноСообщений1.ЦветТекста = ДФ.Цвет.СинийЭлис;
ОкноСообщений1.СтильШрифта = ДФ.СтильШрифта.Курсив;
ОкноСообщений1.ВариантШрифта = ДФ.ВариантШрифта.МаленькиеЗаглавные;
ОкноСообщений1.ЖирностьШрифта = ДФ.ЖирностьШрифта.МенееЖирный;
ОкноСообщений1.РазмерШрифта = 20;
ОкноСообщений1.ВысотаСтроки = 1.25;
ОкноСообщений1.СемействоШрифтов = "PT Sans";

ОкноСообщений1.Позиция = ДФ.Точка(55, 100);

ОкноСообщений1.Показать();

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