Форум: "Базы";
Текущий архив: 2003.03.17;
Скачать: [xml.tar.bz2];
ВнизОтмена Tab в DBGrid на определённую колонку Найти похожие ветки
← →
Grey (2003-02-24 13:12) [0]Мастера, подскажите пожалуйста, как в DBGrid отменить действие клавиши Tab на определённую колонку, т.е. как в полях read only , чтобы не заходило в данную колонку, а перескакивало на следующую.
← →
Grey (2003-02-24 15:00) [1]Что , никто не знает , что-ли ?
← →
Grey (2003-02-24 16:27) [2]Тогда может кто-нибудь знает как использовать TabStops ?
а то пишу Grid.TabStops[6]:=false; , а компилятор выдаёт ошибку , что неизвестный идентификатор , хотя в хелпе написано, что можно так делать
← →
Соловьев (2003-02-24 16:42) [3]проверь, что елс колонку не надо редактировать, то перейти на следующую. Как? наверное сэмулируй нажатие Tab...
← →
Grey (2003-02-24 17:41) [4]> Соловьев ©
в том то и дело, что колонку можно редактировать, так бы я просто поставил read only и всё бы работало
надо чтобы по tab не входило в колонку
так что никто не использовал TabStops?
← →
Соловьев (2003-02-24 18:27) [5]сделай read only:
if Column.FieldName="NO_EDIT" then Grid.ReadOnly := true
else Grid.ReadOnly := true;
← →
ermserg (2003-02-24 18:30) [6]U TDBGrid net svoystva TabStops.
← →
ermserg (2003-02-24 18:32) [7]to Solovyov: a kogda Grid.ReadOnly = false? :)
← →
Соловьев (2003-02-24 18:36) [8]:)))
по умолчанию в else вроде
← →
ermserg (2003-02-24 18:44) [9]to Grey:
Postav flag dgTabs v false (DBGrid.Options), v sobitii OnKeyDown otlavlivay Tab i Alt+Tab i peremeschay focus na kakuyu hochesh column.
← →
Grey (2003-02-24 18:47) [10]>Соловьев ©
так мне не надо read only
надо чтобы была возможность редактировать колонку, но по tab чтобы в неё не входило
← →
Zz_ (2003-02-24 18:52) [11]tab нельзя а мышкой можно. так что-ли ?
← →
Grey (2003-02-24 18:52) [12]>ermserg ©
TabStops есть в TCustomGrid, а TCustomDBGrid наследуется из TCustomGrid
в OnKeyDown конечно можно написать обработчик нажатия, но неужели нельзя сделать это стандартными средствами ?
← →
Grey (2003-02-24 18:53) [13]> Zz_
точно так
← →
Zz_ (2003-02-24 18:58) [14]Что-то типа этого? Не проверял
Не помню как TAB. VK_TAB ???
procedure Tf.gridKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
if(Key=VK_RIGHT)then begin
//Нельзя 2
if(grid.SelectedIndex = 1)then begin
Key := 0;
grid.SelectedIndex := 3;
end;
end else
if(Key=VK_LEFT)then begin
//Нельзя 2
if(grid.SelectedIndex = 3)then begin
Key := 0;
grid.SelectedIndex := 1;
end;
← →
Grey (2003-02-24 19:02) [15]>Zz_
да, чтото типа этого , только с Tab
да, VK_TAB
← →
ermserg (2003-02-24 19:17) [16]to Grey:
TabStops - protected. Mozhesh poluchit k nemu dostup is svoyey programmi esli sozdash naslednika TDBGrid v svoyom module.
← →
ermserg (2003-02-24 19:18) [17]Ya imel vvidu sozdash class - naslednik ot TDBGrid.
← →
Grey (2003-02-25 12:22) [18]как унаследовать свойство TabStops в наследнике , чтобы можно было написать Grid.TabStops[6]:=false;
компонента - наследник TCustomGrid
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.03.17;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.013 c