Вниз
Скачать: CL | DM;

Снять выделение и установить курсор в позицию Combobox-а   Найти похожие ветки 

 
fishka   (2007-05-16 09:58) [0]

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

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

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


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

SelStart
SelLength


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

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


 
clickmaker ©   (2007-05-16 10:15) [3]


> например, 921

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

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


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

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

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

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

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


 
clickmaker ©   (2007-05-16 10:41) [5]

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


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

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

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

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



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

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



Память: 0.46 MB
Время: 0.014 c
1-1175586374
Kolan
2007-04-03 11:46
2007.07.22
Свой ActionList


11-1165925757
Trible
2006-12-12 15:15
2007.07.22
_NewControl


2-1182890452
Сорокин М
2007-06-27 00:40
2007.07.22
qreport


2-1182875295
next22
2007-06-26 20:28
2007.07.22
TEdit..TButton и TImage


2-1182676848
Victor456
2007-06-24 13:20
2007.07.22
Изменение формы окна




   Наверх