![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Форматированный текс [D7, Win95/98, WinME, Win2k, WinXP]
EvgeniyR © (2004-07-08 10:07:00)Здравствуйте, вот такая проблема: на форме два RxRichEdit'а, необходимо нажатием кнопки перенести форматированный текст из одного в другой, не используя буфер обмена с сохранением форматирования. Заранее спасибо.
1008 (2004-07-08 11:31:00) [1]Семен Сорокин © (08.07.04 11:17) [8]
Практика показывает, что процентов 90 кода и советов даваемых в форумах надо проверять и перепроверять. Даже если это код от "голубых" - они ведь тоже люди, а людям свойственно ошибаться. А моё "может поможет" это и была пометка о том, что код не тестирован. Если бы я его проверил, то написал бы, что у меня работает. Вас ещё что-то не устраивает?
P.S. между прочим мы нарушаем правила.
Семен Сорокин (2004-07-08 11:17:00) [2]
> 1008 © (08.07.04 11:10) [7]
если вы даете код, который не тестировали, то будьте любезны сделать соответствующую пометку (а не обнадеживающую надпись "может поможет"), иначе следующим вопросом появится: мне тут привели код, а он почему-то вызывает "Abstract Error", что это и как бороться?
С Уважением.
1008 (2004-07-08 11:10:00) [3]Семен Сорокин © (08.07.04 11:00) [6]
Уважаемый, я помню что через поток, а какой именно пусть выясняет тот кому это надо. Я не дал полный и точный ответ, который следует воспринимать как истину последней инстании - я, всего лишь, показал как это примерно выглядит. Вас ещё что-то не устраивает?
Семен Сорокин (2004-07-08 11:00:00) [4]
> Семен Сорокин © (08.07.04 10:43) [4]
> 3. myStream:=TMemoryStream.Create;
> А это вы уже придираетесь.
ну-ну, вы сообщения компилятора в принципе игнорируете?
1008 (2004-07-08 10:50:00) [5]Плохиш © (08.07.04 10:38) [3]
1. Строчку, которая на всякий случай поставить после SaveToStream.
Да, это верно - забыл.
2. А а всякий случай добавить строчку RxRichEdit1.PlainText := False;
1. По-умолчанию и так стоит.
2. А вдруг пользователю необходим PlainText.
Семен Сорокин © (08.07.04 10:43) [4]
3. myStream:=TMemoryStream.Create;
А это вы уже придираетесь.
Семен Сорокин (2004-07-08 10:43:00) [6]
> Плохиш © (08.07.04 10:38) [3]
>
> > 1008 © (08.07.04 10:31) [2]
>
> 1. Строчку, которая на всякий случай поставить после SaveToStream.
> 2. А а всякий случай добавить строчку RxRichEdit1.PlainText
> := False;
3. myStream:=TMemoryStream.Create;
Плохиш (2004-07-08 10:38:00) [7]
> 1008 © (08.07.04 10:31) [2]
1. Строчку, которая на всякий случайпоставить после SaveToStream.
2. А а всякий случай добавить строчку RxRichEdit1.PlainText := False;
1008 (2004-07-08 10:31:00) [8]var
myStream:TStream;
begin
myStream:=TStream.Create;
myStream.Position:=0; //на всякий случай
RxRichEdit1.Lines.SaveToStream(myStream);
RxRichEdit2.Lines.LoadFromStream(myStream);
Stream.Free;
может поможет
MBo (2004-07-08 10:11:00) [9]>не используя буфер обмена
откуда такое ограничение? это же проще всего
Воспользуйся сообщениями EM_STREAMIN/EM_STREAMOUT