Пишу скрипты для себя, хотелось бы иметь лог по их работам, FillNewWindow для этих делов не совсем подходит, хотелось бы данные выгружать именно в файл на локальном диске, спасибо
Подскажите, возможно ли и как такое сделать, если будет пример кода, то ваще замечательно)
Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7
Выгрузка данных в txt файл Pascal
Re: Выгрузка данных в txt файл Pascal
http://www.delphibasics.ru/TStringList.phpess3nt wrote:Пишу скрипты для себя, хотелось бы иметь лог по их работам, FillNewWindow для этих делов не совсем подходит, хотелось бы данные выгружать именно в файл на локальном диске, спасибо
Подскажите, возможно ли и как такое сделать, если будет пример кода, то ваще замечательно)
Метод 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;
Re: Выгрузка данных в txt файл Pascal
угу, спасибо
получилось что то такое..
получилось что то такое..
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;