Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Снять выделение и установить курсор в позицию Combobox-а [D7, Win2k, WinXP]


fishka ©   (2007-05-16 09:58:00) 

При получении фокуса Combobox (где уже находится значение, например, 921) нужно снять выделение и установить курсор в 4 позицию, чтобы набивать дальше.

Не знаю, как это сделать. Для компонета Edit всё нормально.
(Edit1.SetFocus;
Edit1.SelStart := 4;
Edit1.SelLength := 0;)

Помогите, пожалуйста, с ComboBox-ом. Стиль csDropDown.


fishka   (2007-05-16 11:03:00) [1]

Спасибо. Работает.

Можно ещё повесить на событие KeyUp.
ComboBox1.SelStart:=3;
ComboBox1.SelLength:=0;

А Ваш вариант работает и на вход мыши. ещё раз: СПАСИБО!


clickmaker   (2007-05-16 10:41:00) [2]

это уже из другой серии что-то
не наблюдал такого
в общем, в этом направлении копать надо


fishka   (2007-05-16 10:28:00) [3]

> отправку смс делаешь?
Нет, ввод.

>procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
PostMessage(ComboBox1.Handle, CB_SETEDITSEL,0,$FFFFFFFF);
>end;

Так смешно получилось.
Набираю ( не глядя ) 1234567. Вижу 7654321.

Чего-то не хватает.


clickmaker   (2007-05-16 10:15:00) [4]


> например, 921

отправку смс делаешь?

procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
 PostMessage(ComboBox1.Handle, CB_SETEDITSEL,0,$FFFFFFFF);
end;


fishka   (2007-05-16 10:04:00) [5]

Это не помогает. Если бы было так всё просто.....


clickmaker   (2007-05-16 10:00:00) [6]

SelStart
SelLength


Наверх

Титульная страница Поиск, карта сайта Написать письмо