Script conversion from vb to delphi not working quite right

I am converting a section of successful vbscript code to delphi script and am having an issue with the following section of code.  The error received when I run the script is "Unknown name - GetTreeNo...