Скачать: CL | DM;

Работа с RTF   Найти похожие ветки 

← →
DmitryK   (2006-07-26 12:34) [0]

Такая задача. Есть два RTF файла. Необходимо содержимое одного файла вставить в начало второго. Подскажите как их обьединить чтоб офталось оригинальное форматирование?

---

← →
tesseract ©   (2006-07-26 14:20) [1]

tRichEdit ?

---

← →
DmitryK   (2006-07-26 14:36) [2]

Как это сделать программно? RichEdit поддерживает только загрузку и выгрузку. Может есть какие-то компоненты слияния двух файлов(только без Wordа).

Сейчас я пытаюсь разобраться с форматом, так вот он фпринципе понятен, но что бы один вставить в другой, т.е. соединить таблишу шрифтов, цветов,
кодировки, да потом вставить один в другой и заменив на новые значения таблиц.

То для меня это ужасная задача, да к тому же на которую нет времени.

---

← →
Ketmar ©   (2006-07-26 14:44) [3]

если не жалко clipboard"а -- то можно через него. %-))

---

← →
DmitryK   (2006-07-26 14:48) [4]

Как не затереть данные пользователя в clipboard е ?

---

← →
Чапаев ©   (2006-07-26 14:51) [5]

SaveToStream первый текст, а затем второй туда же?

---

← →
DmitryK   (2006-07-26 14:57) [6]

> SaveToStream первый текст, а затем второй туда же?

Я не понял это о обьединении двух RTF (если да то там намного все сложнее,
я выше уже писал как это можно сделать) елси же о том как сохранить буфере, то я не понял:( .

---

← →
MBo ©   (2006-07-26 15:42) [7]

Использовать сообщения EM_STREAMIN  и EM_STREAMOUT

---

← →
DmitryK   (2006-07-26 16:06) [8]

> Использовать сообщения EM_STREAMIN  и EM_STREAMOUT

А можно как-то поподробнее об этом или где можно почитать?

---

← →
MBo ©   (2006-07-26 16:10) [9]

>А можно как-то поподробнее об этом или где можно почитать?
поиск в Google c запросом
EM_STREAMIN Peter Below

---

← →
Handle   (2006-07-26 17:16) [10]

Открываю я например файл с форматированным текстом

if  OpenDialog1.Execute then
begin
RichEdit1.Lines.LoadFromFile(OpenDialog1.FileName);
end;

Вставляю в текущую позицию курсора форматированный текст

function GetRTFText(ARichEdit: TRichedit): string;
var
  SStr: TStringStream;
  EmptyStr: string;
begin
  emptystr := "";
  SStr := TStringStream.Create(EmptyStr);
  try
    ARichEdit.PlainText := False;
    ARichEdit.Lines.SaveToStream(SStr);
    Result := SStr.DataString;
  finally
    SStr.Free
  end;
end;

begin
RichEdit2.SelText:= GetRTFText(RichEdit1);
end;

И чё получилось, открыл я файл с форматированным текстом загрузил в RichEdit1 нажал кнопку, в RichEdit2 вставился форматированный текст из RichEdit1 в текущую позицию курсора, в итоге форматированный текст RichEdit1 + форматированный текст из RichEdit1.

---

← →
Handle   (2006-07-26 17:17) [11]

Сам непонял

---

← →
Handle   (2006-07-26 17:18) [12]

И чё получилось, открыл я файл с форматированным текстом загрузил в RichEdit1 нажал кнопку, в RichEdit2 вставился форматированный текст из RichEdit1 в текущую позицию курсора, в итоге форматированный текст RichEdit1 + форматированный текст из RichEdit2.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.028 c