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

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

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

Курсор в TMemo [D6, Win95/98, WinXP]

saNat © (2004-12-17 18:50:00)
Доброго времени суток.
Подскажите пожалуйста, как убрать курсор из TMemo. Свойство ReadOnly запрещает редактирование содержимого компонента, а курсор остается.

С уважением, EVA

Yanis (2004-12-18 16:41:00) [1]
С этим кодом текст будет как в справке: только выделяется, а каретки не видно.

Memo1.SetFocus; DestroyCaret;

grom (2004-12-18 16:25:00) [2]
procedure TForm1.Button1Click(Sender: TObject);
begin
ActiveControl:=nil;
end;
И фокус с Memo уберётся.

saNat (2004-12-18 08:34:00) [3]
Up

saNat (2004-12-17 21:34:00) [4]
to begin..endНапример, MemoChange? Не работает...
to gromКак я понял, это свойство формы... Оно пустое, а курсор все равно есть.

С уважением, EVA

grom (2004-12-17 19:08:00) [5]
ActiveControl:=nil;

begin...end (2004-12-17 19:04:00) [6]
> saNat © (17.12.04 18:56)

Не надо выполнять в FormCreate. Надо выполнять тогда, когда нужное memo имеет фокус.

saNat (2004-12-17 18:56:00) [7]
Выполнять, например в FormCreate? Тогда не оно.

С уважением, EVA

olookin (2004-12-17 18:51:00) [8]
HideCaret(Memo1.Handle)?

Наверх

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