Глобальные переменные инициализируются во время запуска основного скрипта, т.е. в вашем случае Q22 = 0.
Можно перенести переменную в функцию :
+'Function __XXX__ :Extended;'
+'Var Q22 :Extended = 180;'
+'begin'
+' result := (-0.0000796032* sin(Q22) + 0.0229054687*Q22 + 4.3681821721);'
+'end;'
+'begin end.'
Комментарии
Глобальные переменные инициализируются во время запуска основного скрипта, т.е. в вашем случае Q22 = 0.
Можно перенести переменную в функцию :
+'Function __XXX__ :Extended;'
+'Var Q22 :Extended = 180;'
+'begin'
+' result := (-0.0000796032* sin(Q22) + 0.0229054687*Q22 + 4.3681821721);'
+'end;'
+'begin end.'
или использовать Run, вместо Compile.