Скрипты Simple-Scada

Синтаксис

procedure TextFileWriteLn(const aStr: string); 

Описание

Записывает строку в текстовый файл.

Пример кода

var
  S: String;
begin
  S := 'Привет мир!';
  // прервать скрипт если файл по стандартному пути не существует
  if not FileExists('MyTextFile.txt', '') then 
    Exit;
  
  // открыть файл для записи
  TextFileOpen('MyTextFile.txt', '', fomRewrite, fcpUTF8);  
  
  // записать в файл строку "S"
  TextFileWriteLn(S);
 
  // закрыть файл
  TextFileClose;
end.