Если что, и формула посложнее, то это можно и скриптами сделать.
2 переменных ОРС и внутренняя. Внутрення привязана к полю, ОРС привязана к нему-же как Ех переменная. на событие OnChangeEx цепляем скрипт виду:
begin
if not (Sender is TM_Object) then Exit;
with Sender as TM_Object do
if (Variable <> nil) and (VariableEx.IsGoodQuality=true) then
begin
Variable.Value:= VariableEx.Value*2500;
end;
end.
То есть, при изменении ОРС переменной выполнится определенная операция с переменной внутренней, которую и покажет в поле.
Собсно скрипт может быть вызван из любого к-ва полей, которые устроит данная математика...
Мой нетрезвый мозг при этом еще и пользуется параметром "Тег", на основании которого в скрипте кейс или иф (if tag=1 then...) меняет математику, которая будет использована.
Мне так удобнее т.к. я наглядно вижу что происходит
