Frxruler. Работа с линейкой
На вкладке FR Tools есть компонент TfrxRuler
Меня интересует, как организовать правильно с ним работу
А именно:
Как перемещаясь по форме, указать чтобы штрих на линейке следовал ЧЕТКО за указателем (т.е. работал нормально)
Ед. измерения-сантиметры
Есть ли какая-нибудь справка о компоненте tfrxRuler?*
Буду признателен
Спасибо
Меня интересует, как организовать правильно с ним работу
А именно:
Как перемещаясь по форме, указать чтобы штрих на линейке следовал ЧЕТКО за указателем (т.е. работал нормально)
Ед. измерения-сантиметры
OnMouseMove
begin
PxInch := GetDeviceCaps(DC,LOGPIXELSY)
PxCm := PxInch/2.54;
frxRuler.Position := X/PxCm;
end;
В таком варианте при увеличивающемся значении Х увеличивается погрешностьЕсть ли какая-нибудь справка о компоненте tfrxRuler?*
Буду признателен
Спасибо
Комментарии
Где fr1cm: Extended = 37.7953, описан frxClass.
PS.
Ваш вариант тоже должен работать.
НЕ говоря уже об осях Х и Y
Я дал ответ, в вашем коде если значение будет отлично от 96 dpi , то линейка будет отрисовыватся не верно, т.к. frxRuler использует свои значения для отрисовки не зависимо от логических единиц монитора.