Как установить жирный шрифт для Созданного объекта

Программирование на Atlantis: приемы и подходы, обмен опытом

Модераторы: larin, Screw

Gimranov
Сообщения: 16
Зарегистрирован: Чт, 22/09/2011 10:54
Имя Фамилия: Александр Гимранов
Откуда: Екатеринбург
Контактная информация:

Как установить жирный шрифт для Созданного объекта

Сообщение Gimranov » Ср, 23/11/2011 13:53

Создали объект

res := cfsCreateObject ( 'PanelInputLine', 'AdvLine', 'SummIndent', false, iObj ); // cfsGetCurrentContainerSelf 'SSETPLATVED'
LogStrToFile('i011.log', 'iObj = '+iObj);
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Origin_X', 130 );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Origin_Y', 70 );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Size_X' , 200 );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Size_Y' , 15 );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Protect', false );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'Skip', true );
if res != 0
Exit;
res := cfsSetProp ( iObj, 'PassiveFormat', '\2p[|-]36`666`666`666`666.88' );
if res != 0
Exit;


Ему надо установить жирный шрифт

den
заказчик
Сообщения: 117
Зарегистрирован: Пт, 26/10/2007 14:16
Имя Фамилия: Денис Кучин
Откуда: Геомостпроект НПО

Re: Как установить жирный шрифт для Созданного объекта

Сообщение den » Ср, 23/11/2011 19:55

С помощью API никак наверное. Но если объект создан успешно и уже живет в экранном формате то можно попробовать при помощи :

procedure SetFontBold (aScreenId : longInt;
aFieldId : integer;
attrVal : boolean);

Gimranov
Сообщения: 16
Зарегистрирован: Чт, 22/09/2011 10:54
Имя Фамилия: Александр Гимранов
Откуда: Екатеринбург
Контактная информация:

Re: Как установить жирный шрифт для Созданного объекта

Сообщение Gimranov » Чт, 24/11/2011 05:48

пробовал этим методом. не могу спозиционироваться на скрине который мне нужен
SetFornBold('scAdvLine', iObj, True)

m0p3e
заказчик
Сообщения: 46
Зарегистрирован: Вт, 13/01/2009 10:52
Имя Фамилия: Сергей Головчак
Откуда: Гипротрубопровод

Re: Как установить жирный шрифт для Созданного объекта

Сообщение m0p3e » Чт, 24/11/2011 07:53

SetFontBold(scAdvLine, iObj, True)
Судя по описанию функции первый параметр - LongInt. Скрин нужно указывать без кавычек.

n0where
Сообщения: 72
Зарегистрирован: Вт, 21/12/2010 06:01
Имя Фамилия: Лобастов Александр
Откуда: Сода

Re: Как установить жирный шрифт для Созданного объекта

Сообщение n0where » Чт, 24/11/2011 09:45

В конфигураторе же есть возможность заполнить FontBold и написать свой вычисляемый алгоритм

Аватара пользователя
Screw
корпорация
Сообщения: 73
Зарегистрирован: Пт, 14/09/2007 22:54
Имя Фамилия: Виталий Корзюк
Откуда: ТопСофт
Контактная информация:

Re: Как установить жирный шрифт для Созданного объекта

Сообщение Screw » Пн, 05/12/2011 15:15

102.104931
Программно атрибуты можно поменять через функцию

procedure cfsSetExtProp( iId : PField; iAttr : PField; iField : PField );
где
iId - конфигурационный идентификатор элемента
iAttr - идентификатор атрибута

const cfpFontBold = 1207;
const cfpFontItalic = 1208;
const cfpFontColor = 1209;
const cfpFontBackColor = 1210;
const cfpInputMask = 1211;

iField - вычисляемое выражение. Допускается использование произвольного вычисляемого выражения, аналогично конструкции {font = {color=<вычисляемое выражение>}}

Так же можно задать вычисляемое выражение через конфигуратор. Если значение задано через конфигуратор, то оно сохраняется в скрипт. Если значение задано программно через функцию, то в конфигураторе строковое представление вычисляемого выражения не определено, и в скрипт не сохраняется. Так же, в конфигураторе можно удалить значение - задать пустую строку.


Доступно с 5.4.37.0


Вернуться в «Программирование»

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 3 гостя