TextFileWriteLn

> [HTML Version](textfilewriteln.html)

**Синтаксис**

````
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.
````