Главная страница
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.029 c
3-1078931138
Goida
2004-03-10 18:05
2004.04.11
Выборка в выборке


6-1078846498
Chlavik
2004-03-09 18:34
2004.04.11
GetIfTable и текущее подключение к инету...


7-1079811061
Алексей31
2004-03-20 22:31
2004.04.11
!!! Записать-отформатировать-считать ?!


1-1082698992
tlan
2004-04-23 09:43
2004.04.11
dll с отчетом выкидывается ошибка EOleSysError


14-1079692733
Chcnger
2004-03-19 13:38
2004.04.11
Список сайтов, как очистить