Foros Club Delphi - TabStop dentro de DBGrid

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - TabStop dentro de DBGrid (https://www.clubdelphi.com/foros/showthread.php?t=4001)

TabStop dentro de DBGrid

Hola a tod@s,
Tengo un DBGrid con 5 columnas (5 campos), quiero q al pasar entre las columnas con la tecla TAB no pare en un campo determinado q es el ultimo campo del grid, algo asi como al TabStop := False para componentes VCL, se agradece cualquier idea...

La propiedad TabStop funcionaría para poderse ubicar o no sobre la rejilla con la tecla tabulador, pero no para las columnas, que son un subconjunto de la rejilla.

Te pongo un ejemplo de como hacer lo que quieres, no tienes más que adaptarlo:

Código:

procedure TfrFacturas.GrLineasKeyDown(Sender: TObject; var Key: Word;

  Shift: TShiftState);

begin



if Key = VK_TAB        then

  begin

    if GrLineas.SelectedIndex < Pred( GrLineas.FieldCount -1 ) then

        begin

        GrLineas.SelectedIndex := GrLineas.SelectedIndex + 1;

        end

        else

        begin

        GrLineas.SelectedIndex := 0;

        //Flecha abajo es decir nuevo registro.

        GrLineas.Perform( wm_KeyDown, vk_Down, 0 );

        end;

    end;

end;

Un Saludo.