Выгрузка данных в txt файл Pascal

[ess3nt]

Пишу скрипты для себя, хотелось бы иметь лог по их работам, FillNewWindow для этих делов не совсем подходит, хотелось бы данные выгружать именно в файл на локальном диске, спасибо

Подскажите, возможно ли и как такое сделать, если будет пример кода, то ваще замечательно)

[drabadan]

Пишу скрипты для себя, хотелось бы иметь лог по их работам, FillNewWindow для этих делов не совсем подходит, хотелось бы данные выгружать именно в файл на локальном диске, спасибо

Подскажите, возможно ли и как такое сделать, если будет пример кода, то ваще замечательно)

http://www.delphibasics.ru/TStringList.php
Метод SaveToFile
Сохраняет строковый список в текстовый файл.

Code: Select all

var
  SL: TStringList;
begin
  SL := TStringList.Create;
  try
    SL.Add('This is a test string' + #10#13 + 'This is another test string');
    SL.SaveToFile('C:\Test\BadLFPair.txt');

    SL.Clear;
    SL.Add('This is a test string'+ #13#10 + 'This is another test string');
    SL.SaveToFile('C:\Test\BadLFPairFix.txt');
  finally
    SL.Free;
  end;

[ess3nt]

угу, спасибо

получилось что то такое..

Code: Select all

procedure writeToFile(some: String);
begin

  SL := TStringList.Create;
   
    SL.LoadFromFile('C:\Users\Sasha\Desktop\UO game\logs\test.txt');
    SL.Add(some);
    SL.SaveToFile('C:\Users\Sasha\Desktop\UO game\logs\test.txt');

    SL.Clear;

end;