|
#1
|
|||
|
|||
вопрос про memo
Как записать в файл всё содержимое Memo (например 4 строчки), а потом считать его из файла? При этом надо учесть, что в файле уже есть информация
|
#2
|
||||
|
||||
юзай поиск, не ленись
http://yandex.ru/yandsearch?text=%D1...+delphi&lr=213 например Я за здоровый экстрим! Спасибо за "спасибо") |
#3
|
|||
|
|||
я всё время нахожу что-то вроде:
Код:
memo1.lines.SaveToFile('тут имя файла'); но мне это вообще никак не подходит |
#4
|
||||
|
||||
а я нашел почему-то
http://www.cyberforum.ru/delphi-begi...ead724459.html Я за здоровый экстрим! Спасибо за "спасибо") |
#5
|
|||
|
|||
про считывание тут нету
|
#6
|
||||
|
||||
Это смотря к чему надо инфу дописывать, или из мемо к сохранке или сохранку к содержимому мемо, в любом случае с помощью экземпляра TStrings нужно загрузить файл, после чего добавить инфу из мемо или в начало или в конец с последующим сохранением. Пять строчек кода всего.
Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
#7
|
|||
|
|||
надо из мемо уже к сохраненному добавить
в общем записываю вот таким образом: Код:
SaveDialog1.InitialDir:='D:\'; SaveDialog1.Filter:='Текстовые файлы|*.txt'; if SaveDialog1.Execute then begin AssignFile(f,SaveDialog1.FileName+'.txt'); Rewrite(f); for i:=1 to Memo1.Lines.Count do begin Writeln(f, Memo1.Lines[i-1]); end; CloseFile(f); end; а как назад вытащить не знаю Последний раз редактировалось Myrik, 26.05.2013 в 01:06. |
#8
|
||||
|
||||
Проверьте только, а то без делфи, по памяти написано
Код:
if FileExists(SaveDialog1.FileName) then with TStringList.Create do begin LoadFromFile(SaveDialog1.FileName); AddStrings(Memo1.Lines); SaveToFile(SaveDialog1.FileName); Free; end else Memo1.Lines.SaveToFile(SaveDialog1.FileName); Я не понял Вашего вопроса, но всё же Вам на него отвечу! Последний раз редактировалось Alegun, 26.05.2013 в 01:56. |