[polik702]

Код:

procedure createfile;
var
mmo1:Tstringlist;
begin
mmo1:=TStringlist.Create;
mmo1.clear;
mmo1.text:='0';
mmo1.SaveToFile('module.txt');
end;

Админ: Пользуемся тегами для оформления кода!

Создаёт файл module.txt : 0 и ещё ентер который не ваще не нужен!!
при использовании компонента memo1 проблема решается, но это занимает больше памяти. нужно как-то выкрутиться с этой ситуации
Заранее спасибо)

[lmikle]

Записывать в файл самому:

Код:

var
  F : TextFile;
begin
  AssignFile(F,'module.txt');
  Rewrite(F);
  Write(F,'0');
  CloseFile(F);
end;