Ваши комментарии

День добрый.


Ок. Спасибо. Поправим.

День добрый.


Пока такой возможности нет. Добавим.

День добрый.


Var  
filename: string;  
txtfile: TStringList;  
Val1, Val2, Val3: double;  

procedure OnStartScript;  
begin  
end;  

procedure OnStopScript;  
begin  
end;

Begin filename := 'C:\log_' + FormatDateTime('YY-MM-DD' ,now) + '.csv';
txtfile := TStringList.create; try if FileExists(filename) then begin txtfile.loadfromfile(filename); end;
txtfile.add(FormatDateTime('YY-MM-DD-HH-NN-SS' ,now) + ';' + FloatToStr(val1)+ ';' + FloatToStr(val2) + ';' + FloatToStr(val3)); txtfile.savetofile(filename); finally txtfile.free; end; end.

Как вариант смените путь сохранения, возможно сохранять в корень диска "С" не дает сама ОС.

День добрый.


Напомните о каком именно примере идет речь, я посмотрю.

День добрый.


С таким поведением не сталкивались. Пришлите Вашу мнемосхему на simp@simplight.ru

Сервис поддержки клиентов работает на платформе UserEcho