Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

RichEdit проблема с копированием-выделением... [D6, WinXP]

demonastarot © (2002-12-13 08:03:00)
Требуется отключить RichEdit, что бы пользователь не видел ни курсора, и не мог выделять - копировать текст...

Были попытки использовать RichView, но там появилась другая проблемка - невозможно определить реальное количество строк (требуется знать размер RichView"а, заполненного текстом)...

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

Может быть кто-нибудь подскажет, что же все-таки делать?

Andrew (2002-12-13 19:43:00) [1]
Я сделал так:
=============
1. Использую TRxRichEdit так как он позволяет отображать картинки;
2. Меняю для RxRichEdit свойство: DragMode = dmAutomatic;
3. Использую очень хорошее свойство RTF - DefAttributes.Protected:

Procedure RTFViewProtectStatus(Status: Boolean);
begin
try
{ Флаг изменения статуса защиты }
FProtectChanging:= True;
With frm.RTFView do
begin
ReadOnly:= Status; { Только для чтения }
DefAttributes.Protected:= Status; { <<<<< Защита RTF }
end;
finally
{ Флаг изменения статуса защиты }
FProtectChanging:= False;
end;
end;

FProtectChanging нужен для события OnProtectChange:

{ Событие при изменении защиты RTF }
procedure Tfrm.RTFViewProtectChange(Sender: TObject; StartPos,
EndPos: Integer; var AllowChange: Boolean);
begin
AllowChange:= FProtectChanging; { Флаг изменения статуса защиты }
end;

Делаем фокус, например, на кнопочку:
BtnFoc.SetFocus;

...и при при потере фокуса принудительно вернем обратно:

{ Потеря фокуса кнопки }
procedure Tfrm.BtnFocExit(Sender: TObject);
begin
BtnFoc.SetFocus; { Обратно вернуть фокус }
end;

Класс!...
Теперь картинки не выделяются, не изменяются в размере и т.п. - только чтение как у PDF.

Как вставлять картинки, я надеюсь, знаете.
Если не знаете, найдете e-mail на сайте: http://rc4wa.narod.ru
Это о моих плагинах и ДУ для Winamp2.

Вот так

Anatoly Podgoretsky (2002-12-13 11:26:00) [2]
Попробуй поместить на панель, и именно у нее сделай Enabled := FALSE

SB (2002-12-13 11:19:00) [3]
Где-то с месяц назад был ответ на этот вопрос. Поищи.

demonastarot (2002-12-13 09:02:00) [4]
:(

Блин... Свойство я и сам могу поставить... Только в этом случае RichEdit цвет шрифта и фона меняет... Мне это не надо...

Song (2002-12-13 08:56:00) [5]
RichEdit1.Enabled:=False

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »