Цветовая раскраска 9.1 как 8.1?

[LaaLaa]

И ещё - у нас есть элементы свои (кнопки, поля) - так вот после применения схемы Dark они оказываются не на своих местах... смещены.

Пришлите скриншот.

[Den]

Скачал посмотрел. С непривычки смотрится жутковато )) Хотя, может кому то по кайфу будет

Может красного добавить?

Конструктивное предложение ) Можно сделать тогда эффект "подтекающих цифр" красным в контролах ввода и активизировать данную схему, если cur_date=FriDay 13

[Алексей]

И ещё - у нас есть элементы свои (кнопки, поля) - так вот после применения схемы Dark они оказываются не на своих местах... смещены.

Пришлите скриншот.

Не нашел как на форуме выложить картинку, а почту Вашу потерял

[maikl]

Под аватаркой личное сообщение

[Алексей]

В личку картинки тоже не вставляются. А выкладывать куда-то не охота.

[LaaLaa]

Есть куча сервисов для онлайн скриншотов типа http://pastenow.ru/

[Алексей]

[LaaLaa]

Ага понятно. Масштаб штифта другой. По этому перечет ширины разошелся.

[LaaLaa]

Алексей, что-то не могу понять.
А каким обозам вы программировали эти добавочные поля и кнопки, что они не сместили после мены шрифта? Через статическое наследование SCREEN? Или через cfsCreateObject?

[Алексей]

через второе

Код: Выделить всё

cfsCreateObject('button','SCZZREM','butSP',FALSE,ButSP);
cfsSetProp('butSP','Origin_X',802 * GetFontSize(0));
cfsSetProp('butSP','Origin_Y',380 * GetFontSize(1));
cfsSetProp('butSP','Size_X',85);
cfsSetProp('butSP','Size_Y',25);
cfsSetProp('butSP','Title','Документы');
cfsSetProp('butSP','StatusCtx',sci13Esc);
cfsSetProp('butSP','Command',cmButSP);

[spark]

а у меня компилятор ругается на это GetFontSize(0)

что это вообще за функция такая?

[edward_K]

По всей видимости сие пользовательская функция с коэффициентами.
1 это для 8 размера шрифта, а дальше зависимость не линейная, почему предпочитаю делать cnf на 8 шрифте, а дальше с масштабированием уже нет проблем. Вот мое определение коэффициентов

Код: Выделить всё

  var wkoef , wkoefx :double ;
  var wfont :string ;
  wkoef:=1 ;
  wfont:=GetStringParameter('Windows','FontSize',0)
  case wfont of
  '9' : { wkoef:=1.05 ;wkoefx:=1.14 ;}
  '10': { wkoef:=1.10 ;wkoefx:=1.25 ;}
  '8' : { wkoef:=1.00 ;wkoefx:=1.00 ;}
  else 
  { wkoef:=double(wfont)+0.0
    wkoef:=sqrt(wkoef/8.0) ;
    wkoefx:=wkoef  //  /8.0
  }
  end ;

[Алексей]

Да, самописная функция с параметрами: 0 по оси X, 1 по оси Y. Возвращает коэффициент, который берёт из значений windows. Я сам не писал, но если интересно, попробую найти исходники, если кому-то нужно.

По идее, атлантис сам должен домножать на эти коэффициенты... ну это мне так хотелось бы

[edward_K]

Сказал а. говори б. Конечно интересно.

[spark]

Да, самописная функция с параметрами: 0 по оси X, 1 по оси Y. Возвращает коэффициент, который берёт из значений windows. Я сам не писал, но если интересно, попробую найти исходники, если кому-то нужно.

По идее, атлантис сам должен домножать на эти коэффициенты... ну это мне так хотелось бы

Конечно интересно!!!