En un dbgrid

[alcides]

Hola a todos y todas,

En un DBGRID cuando llego a la ultima columna en lugar pasar a la proxima linea lo que hace es ocultar la anterior.

Esto es lo que hago:

if Key = #13 then
if not (ActiveControl is TDBGrid) then begin
Key := #0;
Perform(WM_NEXTDLGCTL, 0, 0);
end
else if (ActiveControl is TDBGrid) then

with TDBGrid(ActiveControl) do
if selectedindex < (fieldcount -1) then
selectedindex := selectedindex +1
else
selectedindex := 0;

Que he dejado de hacer.

Gracias anticipadas,

Alcides
Rep.Dom.