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

Edit без фокуса   Найти похожие ветки 

← →
Романов Р.В. ©   (2003-01-21 16:26) [0]

Возможно ли без написания потомка сделать так чтобы компонент TEdit (в частности) не получал фокус при клике на нем мышкой. Может какие нибудь стили подправить надо RunTime.

---

← →
KDenis ©   (2003-01-21 16:46) [1]

Попробуй для этого едита написать такой обработчик события TForm1.Edit1Click: button1.SetFocus;

А если ты просто нехочешь, чтоб текст в едите изменяли, то его свойство ReadOnly должно быть false

---

← →
KDenis ©   (2003-01-21 16:47) [2]

<<должно быть false>>
Тоесть true

---

← →
Романов Р.В. ©   (2003-01-21 16:51) [3]

Я хочу едит не получал фокус. ReadOnly у него уже давно поставлен. TLabel не хочу ставить по эстетическим соображениям, он не гармонирует с другими Editami на форме.

---

← →
KDenis ©   (2003-01-21 16:56) [4]

А с помощью ApplicationEvents пробовал?

---

← →
Smithson ©   (2003-01-21 16:59) [5]

А если .Disable := True;

---

← →
Skier ©   (2003-01-21 17:00) [6]

При клике на нём мышкой вызывай SelectNext(...)
Не поможет ?

---

← →
uw ©   (2003-01-21 17:04) [7]

Рассмотрение разных системных программ показывает, что в таких компонентах, как Memo, Edit, разработчики заботятся только о том, чтобы TabStop было False и ReadOnly было True. И еще серенький цвет. И все это выглядит нормально.

---

← →
Mike Kouzmine   (2003-01-21 17:04) [8]

Создай глоб перемену : TWinControl На всех контролах (креме этого эдита) на onExit присваивай этой переменной значение Sender as TWinControl, а на onEnter edita поставь ИмяПерем.SetFocus

---

← →
han_malign ©   (2003-01-21 17:14) [9]

ControlStyle:=ControlStyle+[csNoStdEvents];
TabStop:=false;

---

← →
error 2k ©   (2003-01-21 17:15) [10]

Mike Kouzmine, чего?
в событии OnEnter этого компонента ставишь
FindNextControl(Sender as TWinControl, true true, false).SetFocus;

---

← →
REA ©   (2003-01-21 17:18) [11]

И StaticText не гармонирует?

---

← →
error 2k ©   (2003-01-21 17:22) [12]

REA, согласен:)

---

← →
uw ©   (2003-01-21 17:27) [13]

>han_malign. А все равно мышкой выбирается.

---

← →
Романов Р.В. ©   (2003-01-21 17:43) [14]

Вот в принципе все что нужно было сделать.
SetWindowLong(edPayAll.Handle, GWL_STYLE, GetWindowLong(edPayAll.Handle, GWL_STYLE) or WS_DISABLED);

PS: Плохо когда MSDN нет под рукой.

---

← →
uw ©   (2003-01-21 19:52) [15]

Все равно не здорово. Табуляция застревает.

---

← →
Романов Р.В. ©   (2003-01-21 20:14) [16]

edPayAll.TabStop := False;

---

← →
uw ©   (2003-01-21 22:10) [17]

Здорово!

---

← →
Спрашивающий   (2003-01-22 01:40) [18]

А не проще ли при переходе на Edit1 передавать фокус ввода очередному элементу ну скажем Edit2.SetFocus и все?

---

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

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



Память: 0.48 MB
Время: 0.012 c