Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.11;
Скачать: CL | DM;

Вниз

Перехват нашатия клавишь   Найти похожие ветки 

 
VEZ   (2005-11-11 14:35) [0]

Есть потомок стринггрида, где добавлен комбобокс, нужно запретить вводить текст в этот комбобокс, и позволить только выбирать значения из списка, я конечно может быть сделал криво, но решил перехватывать нашатые клавиши присваивать им код 0, что собственно не катит скажем с клавишей бэкспэйс, может кто знает как обойти.


 
MBo ©   (2005-11-11 14:46) [1]

Посмотри на свойство Tcombobox.style


 
VEZ   (2005-11-11 15:04) [2]

Дак помоему в комбобоксе, встроенном в стрингрид нельзя обращаться к его свойствам, это просто вид колонки грида, и обращаешся к нему по Cells, если бы так можно было то проблем бы таких вообще не возникло.


 
MBo ©   (2005-11-11 15:58) [3]

Насколько я понимаю, от того, что комбобокс (если это настоящий комбобокс) куда-то там встроен, он не перестает быть комбобоксом с вытекающими отсюда свойствами


 
VEZ   (2005-11-11 16:18) [4]

Ну это просто стиль ячейки грида, PickList называется, в Rx гриде можно задавать это напрямую, или же в обычном гриде писать потомка

function TChannelGrid.CreateEditor: TInplaceEdit;
begin
 Result := TInplaceEditList.Create(Self);
 (Result as TInplaceEditList).OnGetPickListitems := FOnGetPickListItems;
end;

function TChannelGrid.GetEditStyle(ACol, ARow: Integer): TEditStyle;
begin
 if ACol = 2 then
   Result := esPickList
 else
   Result := inherited GetEditStyle(ACol, ARow);
end;.


 
Leonid Troyanovsky ©   (2005-11-11 16:38) [5]



> function TChannelGrid.CreateEditor: TInplaceEdit;
> begin
>  Result := TInplaceEditList.Create(Self);
>  (Result as TInplaceEditList).OnGetPickListitems := FOnGetPickListItems;

> end;


А если  конструктор дополнить:
HandleNeeded;
SetWindowLong(..); // not tested

--
Regards, LVT.



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

Текущий архив: 2005.12.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.057 c
2-1132659001
oleggar
2005-11-22 14:30
2005.12.11
script


2-1132654437
mrAld
2005-11-22 13:13
2005.12.11
глюк TPageControl


2-1133118762
Flea
2005-11-27 22:12
2005.12.11
горячая клавиша на ctrl+апостроф


9-1121760721
google_na_otdyhe
2005-07-19 12:12
2005.12.11
Кто что написал


14-1132381507
Kolan
2005-11-19 09:25
2005.12.11
Поздравьте меня, я сдал на права :)