===== Открываем диалог открытия файла =====

Как быть, если надо прочитать содержимое какого-нибудь файла?

Первое, что нам потребуется, это локатор файла. Можно использовать модуль ''Dialog'' для включения системного диалога выбора файла:

<code oberon2>
PROCEDURE OpenFile*;
	VAR loc: Files.Locator; name: Files.Name;
BEGIN
	Dialog.GetIntSpec('txt', loc, name);
END OpenFile;
</code>


продолжение следует...