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

Вниз

Edit и DBGrid   Найти похожие ветки 

 
TATIANA   (2004-03-17 10:10) [0]

Здравствуйте , господа мастера !
Вопрос простенький , но не получается .
Делаю поиск в таблице - использую Edit , IBQuery1.Locate .
Если запись не найдена - IBQuery1.RecNo := ukaz;
После ввода символов фокус остается у компонента EDIT .
Пытаюсь сделать -

procedure TForm2.Edit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
  if (Key = VK_DOWN) or (Key = VK_UP) then begin
   case PageControl1.TabIndex of
   0: DBGrid1.SetFocus;    // begin
                 // end;  // beg - 0
   1: DBGrid1.SetFocus;   //  begin
                 // end;  // beg - 1
   end;     // case
 end;     // key    
end;

Выдает ошибку , что не может передать фокус .
Господа , как передать фокус DBGrid .
Спасибо всем .


 
DenK_vrtz ©   (2004-03-17 10:22) [1]

Может лучше событие OnChange у Edit"а использовать для поиска?
А IBQuery1.RecNo случаем не -1 равно?


 
Плохиш   (2004-03-17 10:31) [2]

>TATIANA   (17.03.04 10:10)

В сообщении же об ошибке на чистом англицком языке написано "Фокус не может быть передан на невидимый или запрещённый компонент"! Делай выводы. И не забывай, что ты используешь PageControl.


 
TATIANA   (2004-03-17 10:43) [3]

Плохиш , спасибо за подсказку - "невидимый или запрещенный компонент" . Все получается . В голове глюки , я ошиблась в номере DBGRID . Написала правильный номер - все работает .



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

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

Наверх




Память: 0.47 MB
Время: 0.077 c
1-1082972647
AlexEagle1
2004-04-26 13:44
2004.04.11
Интерфейс в стиле Office2003


14-1079246834
Шишкин Илья
2004-03-14 09:47
2004.04.11
Вопрос по Интернет


8-1071123676
Gray
2003-12-11 09:21
2004.04.11
Записать сигнал с линейного входа


14-1082441697
Vlad Oshin
2004-04-20 10:14
2004.04.11
Делаю книгу. Как сделать лучше?


11-1067411606
SPeller
2003-10-29 10:13
2004.04.11
Интересно...