06/04/2006

Itens no DBGrid

Gostaria de fazer um grid para inclusão itens, tipo:

Codigo | Descrição | Qtd | Valor Uni. | Total

09578 Teclado 5 20,00 100,00

primeiramente, o cursor ficaria somente na coluna |Codigo| e |Descrição|
apos teclar <enter> o cursor se deslocaria para a coluna |Qtd| e apos digitar a quantidade e teclar <enter>, buscaria o |Valor Uni.| e totalizava a coluna |Total|, após isso abreria uma nova Linha.

Minha duvida:

Como trabalhar com o Grid, para fazer estes lançamentos dessa forma?

Obrigado pela atenção.


Ullrich

Respostas

06/04/2006

Paullsoftware

Adapte o código abaixo as suas necessidades no OnKeyPress do seu Grid...
if Key=#13 then
  Begin
    If DbGrid1.SelectedIndex<>4 Then//Verifico se o cursor está na última coluna da minha Grid, caso esteja passo para a próxima coluna...
      Begin
       DbGrid1.SelectedIndex:=DbGrid1.SelectedIndex+1;
      end
    Else //senão
      Begin
        if (DbGrid1.SelectedIndex=4)and(TbItens.Eof) then//se estiver na última coluna do meu grid e for o final da minha tabela, insiro um novo registro e posiciono o cursor na primeira coluna
          Begin
            TbItens.Append;
            DbGrid1.SelectedIndex:=0;
          End
       Else//caso contrário passo para o próximo registro
          Begin
            TbItens.Next;
            DbGrid1.SelectedIndex:=0;
          End;
      End;
  End;
espero ter ajudado :wink:


Responder Citar