There is "fexpand" in unit dos (which is more TP like with 255 char limits ) and
the more modern delphi like expandfilename() in sysutils.
There is not much TPW support (like units windos and the like), and even what there is is limited to windows 3.x ports, not the general subset.
Best to use the sysutils variant.