А что мешает вызывать процедуру считывания из файла и инициализации контролов каждый раз, перед открытием окна?
## Код:
```
MODULE MyAppForm1;

IMPORT StdCmds;

PROCEDURE InitData;
BEGIN
    (* Здесь делаем что-нить с данными *)
END InitData;

PROCEDURE Open*;
BEGIN
    InitData;
    StdCmds.OpenAuxDialog('MyApp/Rsrc/Form1','Форма 1')
END Open;

BEGIN
   InitData;
END MyAppForm1.
```


P.S. В дальнейшем можно вызывать процедуру MyAppForm1.Open по нажатию кнопки или при вызове пункта меню.
P.P.S. Хороший пример на эту тему - ObxFileTree