Wie schon gesagt wurde, erstmal solltest du dir sorgen machen, wenn mehr im Code steht (siehe das IF-THEN), als im Pseudocode vorkommt.
if not x = length(text) then
hier ist dir auch noch ein Fehler unterlaufen (auch wenn es ja eigenltich eh unnötig war)
da
NOT vorrang vor
= hat, übersetzt der Compiler es so
if (not x) = length(text) then
ich vermute aber mal, daß du eigentlich dieses haben wolltest:
Delphi-Quellcode:
if not (x = length(text)) then
// bzw.
if x <> length(text) then