TEdit.AutoSelect

← →
StriderMan © (2007-06-18 15:44) [0]

Сабж не работает. в хэлпе никаких доп. условий нет, как заставить работать?

← →
Правильный Вася (2007-06-18 15:50) [1]

а как должен?
версия дельфи?

← →
MBo © (2007-06-18 15:52) [2]

Оно работает, когда табом переходишь или фокус программно переставляешь.

← →
StriderMan © (2007-06-18 15:52) [3]

> Правильный Вася (18.06.07 15:50) [1]

Determines whether all the text in the edit control is automatically selected when the control gets focus. Set AutoSelect to select all the text when the edit control gets focus. AutoSelect only applies to single-line edit controls. Use AutoSelect when the user is more likely to replace the text in the edit control than to append to it.

D7

выделяться весь текст должен при получении фокуса.

> MBo © (18.06.07 15:52) [2]

а мышкой нет? :(

пробовал даже

procedure TForm1.Edit1Enter(Sender: TObject); begin Edit1.SelectAll; end;
не помогло

кажется нашел почему.

procedure TCustomEdit.CMEnter(var Message: TCMGotFocus); begin if FAutoSelect and not (csLButtonDown in ControlState) and (GetWindowLong(Handle, GWL_STYLE) and ES_MULTILINE = 0) then SelectAll; inherited; end;

в принципе - логично. чтобы можно было курсор в нужную позицию хлопнуть.

вопрос снят.

TEdit.AutoSelect Найти похожие ветки