VPF::just copy the style posibility !!! - Форум программистов

huismori

Дата 25.11.2010, 10:33 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет

is it possible just copy the styles from one richedit to another ? i dont want to copy the text just the style with different text !!!

this copies the style and text;

Цитата

var
    ms: TMemoryStream;
begin
    ms := TMemoryStream.Create;
    try
     RichEdit1.Lines.SaveToStream(ms) ;
     ms.Seek(0, soFromBeginning) ;
     RichEdit2.Lines.LoadFromStream(ms) ;
    finally
     ms.Free;
    end;
end;

but i want just the style with different text... is it possible ?

thanks in advance

cat512

Дата 25.11.2010, 15:34 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 438
Регистрация: 20.3.2007

Репутация: 7
Всего: 15

You can clear "Lines.text" property after you loaded object from stream

Код


 var
    ms: TMemoryStream;
 begin
    ms := TMemoryStream.Create;
    try
     RichEdit1.Lines.SaveToStream(ms) ;
     ms.Seek(0, soFromBeginning) ;
     RichEdit2.Lines.LoadFromStream(ms) ;
 RichEdit2.Lines.Text := '';
//or so
RichEdit2.Lines.Clear
    finally
     ms.Free;
    end;
 end;

Snowy

Дата 25.11.2010, 16:16 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Код

  RichEdit2.SelectAll; // if you need appli to all text
  RichEdit2.SelAttributes.Assign(RichEdit1.SelAttributes); // copy text attributes

huismori

Дата 25.11.2010, 22:02 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет

Snowy's code is really good but it is making the whole richedit text same style !!!
i want get the style sama as the other like copying

Xenag

Дата 26.11.2010, 01:18 (ссылка)

(голосов:1)

Загрузка ...

Шустрый

Профиль
Группа: Awaiting Authorisation
Сообщений: 51
Регистрация: 6.3.2010

Репутация: нет
Всего: нет

Apply to different texts the same style - the task some Artificial Intelligence
How do you see it?
Try to do it in MS Word...
Copy one style - it's simply.
But how copy multiply styles to diffirent textes?

skyboy

Дата 26.11.2010, 01:38 (ссылка)

(нет голосов)

Загрузка ...

неОпытный

Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: 4
Всего: 260

Цитата(Xenag @ 26.11.2010, 00:18

)

Apply to different texts the same style - the task some Artificial Intelligence

cat512

Дата 26.11.2010, 15:40 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 438
Регистрация: 20.3.2007

Репутация: 7
Всего: 15

Xenag, do you confident that TS understand you?

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »