Create (TFileDocumentLocator)

pt 

Find (TFileDocumentLocator)