P
popPunk
Давайте вместе придем к правильному ответу и обуздаем эту Длл.
Стоит такая задача: нарисовать в 1С схему окна, которое заказывается.
Есть пример документа, но там код Ооооочень длинный, и понять его дано лишь автору...
Вот мой кусок тестового документа:
Процедура Арбайтн()
Тек =( ТекущаяДата() - 1);
Сообщить(Тек);
Файл = КаталогИБ()+"pic\"+номердок+".Bmp";
Если ЗагрузитьВнешнююКомпоненту(КаталогИБ()+"draw.dll") = 1 Тогда исх_строка="P(1,2,1);B(16777215);Pg(1,0,0,0,0,1,1,1);";
Math = СоздатьОбъект("AddIn.AddInDoc");
Math.MGetCPU();
Math.MGetFeatures("111111111");
W = 700;
H = 606;
X = 330;
Y = -20;
конецесли;
Math.MDraw(Форма.Заголовок(),X,Y,W,H,0,исх_строка);
Math.MSaveBW(Файл);
КонецПроцедуры
Кто что подскажет!!!!
Стоит такая задача: нарисовать в 1С схему окна, которое заказывается.
Есть пример документа, но там код Ооооочень длинный, и понять его дано лишь автору...
Вот мой кусок тестового документа:
Процедура Арбайтн()
Тек =( ТекущаяДата() - 1);
Сообщить(Тек);
Файл = КаталогИБ()+"pic\"+номердок+".Bmp";
Если ЗагрузитьВнешнююКомпоненту(КаталогИБ()+"draw.dll") = 1 Тогда исх_строка="P(1,2,1);B(16777215);Pg(1,0,0,0,0,1,1,1);";
Math = СоздатьОбъект("AddIn.AddInDoc");
Math.MGetCPU();
Math.MGetFeatures("111111111");
W = 700;
H = 606;
X = 330;
Y = -20;
конецесли;
Math.MDraw(Форма.Заголовок(),X,Y,W,H,0,исх_строка);
Math.MSaveBW(Файл);
КонецПроцедуры
Кто что подскажет!!!!