Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перемещение по DBGrid [D7]

Evg12345 © (2003-05-08 08:03:00)
Подскажите пожалуйста как можно "перепрыгивать" от поля к полю (как это происходит по нажатию TAB) по нажатию кнопки Enter.

Anatoly Podgoretsky (2003-05-08 11:04:00) [1]
SelectedIndex

Evg12345 (2003-05-08 10:15:00) [2]
спасибо

Stas (2003-05-08 10:05:00) [3]
>Vopros
>keybd_event(9, 0, 0, 0); - класс !!!
А что это за процедура ?

3JIA9I CyKA (2003-05-08 10:01:00) [4]
if Key = VK_RETURN then Key := VK_TAB; // (или как там его, таба ентого)

vopros (2003-05-08 09:57:00) [5]
>Stas © (08.05.03 09:44)
А прверку на последнюю ты сделал?

procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=13 then keybd_event(9, 0, 0, 0);
end;

Вроде так

Danilka (2003-05-08 09:54:00) [6]
Stas © (08.05.03 09:51)
верно.
слепой я, недочитал вопрос, не увидел "от поля к полю" :))

Stas (2003-05-08 09:51:00) [7]
to Danilka
>DBGrid1.DataSource.DataSet.Next;

Это курсор будет переходить на новую запись, а не поле.

Danilka (2003-05-08 09:49:00) [8]
или вот-так:

procedure TForm1.Button1Click(Sender: TObject);
begin
DBGrid1.DataSource.DataSet.Next;
end;

;))

Stas (2003-05-08 09:44:00) [9]
Событие DBGRID OnKeyDown

procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=13 then Dbgrid1.SelectedIndex:=Dbgrid1.SelectedIndex+1;
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »