function AddLineToTxtFile

function AddLineToTxtFile(AFileName, S : string) : boolean;

Добавляет строку S к текстовому файлу с именем AFileName. Файл создается в случае его отсутствия и открывается в случае наличия, закрытие файла производится сразу после добавления строки. Данная функция удобна для формирования сводных протоколов и ведения единого протокола с данными для администратора.

В имени файла допустимо указывать макросы, подробнее см. в разделе "макросы, допустимые в именах файлов"

Функция возвращает true в случае успешного добавления строки к файлу и false в случае ошибки.

Пример:

1. Простейший пример:

begin

 AddLineToTxtFile('c:\log.txt', 'Сообщение');

end.

2. Пример генерации протокола, строки которого содержат дату, время и имя компьбютера:

begin

 AddLineToTxtFile('c:\log.txt', 

                  DateTimeToStr(Now)+' '+GetComputerName+' : '+

                  'Сообщение');

end.