|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
mmo1.text:='0'; создаёт ентер! ПОМОГИТЕ ОЧЕНЬ НАДО!
Код:
procedure createfile; var mmo1:Tstringlist; begin mmo1:=TStringlist.Create; mmo1.clear; mmo1.text:='0'; mmo1.SaveToFile('module.txt'); end; Создаёт файл module.txt : 0 и ещё ентер который не ваще не нужен!! при использовании компонента memo1 проблема решается, но это занимает больше памяти. нужно как-то выкрутиться с этой ситуации Заранее спасибо) Последний раз редактировалось Admin, 21.03.2015 в 21:57. |
#2
|
|||
|
|||
Записывать в файл самому:
Код:
var F : TextFile; begin AssignFile(F,'module.txt'); Rewrite(F); Write(F,'0'); CloseFile(F); end; |
Этот пользователь сказал Спасибо lmikle за это полезное сообщение: | ||
polik702 (29.03.2015)
|