Портятся файлы RichEdit -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [3.142.53.68]

ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi

Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...

Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.

Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Модераторы: jack128, D[u]fa, Shaggy, Rouse_

Новое голосование

Портятся файлы RichEdit

^D^ima

Сообщ. #1 , 08.12.16, 09:53

Guru

Профиль · PM

Поощрения: 3 Dgm

Рейтинг (т): 303

Delphi 7. На форме RichEdit.

Сохраняю через RichEdit1.Lines.SaveToFile(SSave);
На выходе файлы не большие, около 1 Мб, формат RTF

Иногда когда открываю через RichEdit1.Lines.LoadFromFile то иногда вижу такое:

Причем это так и в ворде открывается. Из чего я делаю вывод что портиться он при сохранении.

Как можно от этого избавиться?
Прикреплённый файл

123.png (12,45 Кбайт, скачиваний: 503)

Вот сами потроха:
Испорченный файл(начало):

{\rtf1\ansi\deff0{\fonttbl{\f0\fnil MS Sans Serif;}}

{\colortbl ;\red0\green0\blue128;}

\viewkind4\uc1\pard\cf1\lang1049\f0\fs16\{\\rtf1\\ansi\\ansicpg1251\\deff0\\deflang1049\{\\fonttbl\{\\f0\\fnil MS Sans Serif;\}\{\\f1\\fnil\\fcharset204 MS Sans Serif;\}\{\\f2\\fswiss\\fcharset0 Tahoma;\}\{\\f3\\fswiss\\fcharset204 Tahoma;\}\}

\par \{\\colortbl ;\\red0\\green0\\blue128;\\red0\\green128\\blue0;\}

\par \\viewkind4\\uc1\\pard\\cf1\\f0\\fs16 [13.09.2016 9:42:01] \\cf2 \\f1\\'ca\\'f2\\'ee: \\'cb\\'fe\\'e1\\'f7\\'e5\\'ed\\'ea\\'ee \\'c8\\'eb\\'fc\\'ff \\'ca\\'ee\\'ec\\'f3:Administrator\\cf1 \\'c4\\'e8\\'ec\\'e0, \\'ef\\'f0\\'e8\\'e2\\'e5\\'f2. \\'c0 \\'ec\\'ee\\'e6\\'ed\\'ee \\'e7\\'e0\\'ec\\'e5\\'ed\\'e8\\'f2\\'fc \\'ea\\'eb\\'e0\\'e2\\'e8\\'e0\\'f2\\'f3\\'f0\\'f3?

Цельный файл(начало):

{\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fnil MS Sans Serif;}{\f1\fnil\fcharset204 MS Sans Serif;}{\f2\fswiss\fcharset0 Tahoma;}{\f3\fswiss\fcharset204 Tahoma;}}

{\colortbl ;\red0\green0\blue128;\red0\green128\blue0;}

\viewkind4\uc1\pard\cf1\f0\fs16 [13.09.2016 9:42:01] \cf2 \f1\'ca\'f2\'ee: \'cb\'fe\'e1\'f7\'e5\'ed\'ea\'ee \'c8\'eb\'fc\'ff \'ca\'ee\'ec\'f3:Administrator\cf1 \'c4\'e8\'ec\'e0, \'ef\'f0\'e8\'e2\'e5\'f2. \'c0 \'ec\'ee\'e6\'ed\'ee \'e7\'e0\'ec\'e5\'ed\'e8\'f2\'fc \'ea\'eb\'e0\'e2\'e8\'e0\'f2\'f3\'f0\'f3?

Сразу видна разница.

есть-ли какой-то ещё способ сохранить, или переписать может быть функцию...

^D^ima	Сообщ. #2 , 08.12.16, 13:15
Guru Профиль · PM Поощрения: 3 Dgm Рейтинг (т): 303	Ещё беда заключается в том, что такой глючный файл при открытии и повторном сохранении распухает каждый раз примерно в 2 раза и я видел как он распухал до нескольких гигов, это с 1-то мегабайта ... я в панике:help:

^D^ima	Сообщ. #3 , 09.12.16, 20:13
Guru Профиль · PM Поощрения: 3 Dgm Рейтинг (т): 303	Какие-то версии\предложения будут?

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0258 ] [ 18 queries used ] [ Generated: 19.04.24, 15:55 GMT ]