Если я правильно понял вопрос ТС, то есть 3 ТекстБокса: Паскаль, Бар, ММРтути ( числовые значения )
То на KeyUp каждого навесить событие пересчитывающее значения остальных.
Например:
* Нажимаем '1' в Паскаль
* Событие "KeyUp"
* Бар.Текст = функцияПаскальВБар(Паскаль.Текст)
* ММРтути.Текст = функцияПаскальВММРтути(Паскаль.Текст)
Соответственно в мой пример добавить конвертер или парсер в double