Der abgebildete Code läuft doch sicher nicht (then z = e sollte die erste Fehlermeldung bringen, bzw. soagr schon z=0). Zuweisungen mit := und Vergleiche mit =. Im Prinzip macht Deine Funktion nicht mehr als z := e bzw. macht in Wirklichkeit garnichts.
Zahlen in einem Label ausgeben läuft in etwa so:
Label1.Caption := IntToStr(x);
Aber da ja alles neu geschrieben werden muss (Du hast ja nichts) wird das in den verbleibenden 15 Min nichts mehr.