• Registered: 2018-01-03
  • Posts: 50

Topic: Создание текстового файла

Подскажите, как создать файл, с последующей записью в него текстовой переменной, не из базы.
А то в версии 1,46 нет функций CreateFile или SaveFile. SaveFileFromDatabase немного не то.

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Создание текстового файла

Пример

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
   sl: TStringList;
   s: string;
begin
     s := 'test';

     sl := TStringList.Create;
     sl.Text := s;
     sl.SaveToFile('d:\1.txt');
     sl.Free;
end;
Dmitry.
  • Registered: 2018-01-03
  • Posts: 50

Re: Создание текстового файла

Спасибо большое!