Vielleicht sollest du einfach deinen eigenen Sourcecode
gründlich lesen.
Hast du einen Drucker? Dann bitte drucken und lesen.
Hier ein kleiner verkürzter Ausschnitt:
Delphi-Quellcode:
function TFormTR.BerechneTerm(Formular: string): Double;
...
begin
Formular := LabelAnzeige.Caption; // ***
Die markierte Zeile ist ja wohl "Quatsch" - wozu übergibst du der Funktion den Parameter "Formular",
wenn dieser Parameter sogleich in der 1. Zeile überbügelt wird?