Показать сообщение отдельно
  #1  
Старый 26.03.2012, 17:53
Nautilus Nautilus вне форума
Новичок
 
Регистрация: 07.02.2012
Сообщения: 53
Репутация: 10
По умолчанию CSV файл не записывает в одну строку

Почему с таким кодом
Код:
procedure CSV_File (FileName: String; separator: char);
var f: TextFile;
    s1, s2, rez: string;
begin
  s1 := Form1.Label3.Caption ;
  s2 := Form1.Label2.Caption ;
  rez := s1 + #35 + s2 + #35;
  AssignFile (f, FileName);
 if FileExists('c:\Ил-2\Титан\SCADA\Тест.csv')  then
 begin
 Reset(f);
 Append(f);
 writeln (f, rez);
 CloseFile(f);
 end;
end;

lmikle: Пользуемся тегами!!!

в CSV файле записывается
16:47:17#1221
#
а хотелось
16:47:17#1221#
Ответить с цитированием