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

Привет! Возник следующий вопрос. Программа состоит из основного окна Form1 и нескольких Unit. По таймеру в Form1 запускается один из Unit'ов, в которых производятся некие вычисления и выводят данные на графики. В данном Unit'е происходит открытие текстового файла и производится либо чтение либо запись. Как мне сделать так, чтобы данный текстовый файл был открыт один раз при запуске программы и закрыт при закрытии программы?

Я вообще делаю неправильно: при каждом обращении к Unit в разных функция у меня открывается файл и там же закрывается. В последующих функциях тоже самое.

И ещё: Я открываю файл посредством TStringList. Правильно ли это? Или чушь и нужно использовать нечто другое?

В общем как всегда жду дельного и ценного совета от коллектива КиберФорума!