Первое, что нам потребуется, это локатор файла. Можно использовать модуль Dialog
для включения системного диалога выбора файла:
PROCEDURE OpenFile*; VAR loc: Files.Locator; name: Files.Name; BEGIN Dialog.GetIntSpec('txt', loc, name); END OpenFile;