De Darío Álvarez Aranda en trucomanía (
www.q3.nu)
Código Delphi
[-]
with (Sender as TDbGrid) do
if (Key = VK_DOWN) or ((Key = VK_TAB) and (SelectedIndex = Columns.Count-1)) then
begin
DataSource.DataSet.DisableControls;
DataSource.DataSet.Next;
if DataSource.DataSet.EOF then
Key := 0
else
DataSource.DataSet.Prior;
DataSource.DataSet.EnableControls;
end;
Saludos.