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

Курсор в TMemo   Найти похожие ветки 

← →
saNat ©   (2004-12-17 18:50) [0]

Доброго времени суток.
Подскажите пожалуйста, как убрать курсор из TMemo. Свойство ReadOnly запрещает редактирование содержимого компонента, а курсор остается.

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

---

← →
olookin ©   (2004-12-17 18:51) [1]

HideCaret(Memo1.Handle)?

---

← →
saNat ©   (2004-12-17 18:56) [2]

Выполнять, например в FormCreate? Тогда не оно.

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

---

← →
begin...end ©   (2004-12-17 19:04) [3]

> saNat ©   (17.12.04 18:56)

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

---

← →
grom   (2004-12-17 19:08) [4]

ActiveControl:=nil;

---

← →
saNat ©   (2004-12-17 21:34) [5]

to begin..end Например, MemoChange? Не работает...
to grom Как я понял, это свойство формы... Оно пустое, а курсор все равно есть.

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

---

← →
saNat ©   (2004-12-18 08:34) [6]

Up

---

← →
grom   (2004-12-18 16:25) [7]

procedure TForm1.Button1Click(Sender: TObject);
begin
ActiveControl:=nil;
end;
И фокус с Memo уберётся.

---

← →
Yanis ©   (2004-12-18 16:41) [8]

С этим кодом текст будет как в справке: только выделяется, а каретки не видно.


 Memo1.SetFocus;
 DestroyCaret;


---

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

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



Память: 0.46 MB
Время: 0.021 c