Ir para conteúdo
Fórum Script Brasil

Bruninn

Membros
  • Total de itens

    5
  • Registro em

  • Última visita

Sobre Bruninn

Bruninn's Achievements

0

Reputação

  1. Bruninn

    1ª Linha -dbgrid

    quando for a primeira linha do dbgrid...
  2. Como ficaria o comando if ...pra se for a primeira linha do dbgrid que estiver selecionada?
  3. Bruninn

    Loop Infinito

    Consegui resolver! ficou assim: tbCaixa.First; total_anterior := tbCaixaTOTAL.AsFloat; tbCaixa.Next; while not tbCaixa.Eof do begin tbCaixa.Edit; tbCaixaTOTAL.AsFloat := total_anterior + tbCaixaCREDITO.AsFloat - tbCaixaDEBITO.AsFloat; tbCaixa.Post; total_anterior := tbCaixaTOTAL.AsFloat; tbCaixa.Next; end; tbCaixa.Close; tbCaixa.Open; vlw pela ajuda...se não fosse por você eu não teria conseguido! :D
  4. Bruninn

    Loop Infinito

    olá Micheus...vlw pela ajuda, mas na verdade o meu problema é o seguinte: na minha tabela (tbCaixa) tem os seguintes campos: credito, debito e total. O total = total + credito - debito que foram digitados. Porém, quando faço uma exclusão do registro, os valores do total ficam errados, como mostra na imagem. Antes de excluir: Depois de excluir: Gostaria que, quando eu excluisse um registro...pegasse o valor do total acima do excluido e somasse com o valor do credito/debito do abaixo...fazendo com que todos os registros que estavam depois do que foi deletado fiquem certos. Com o código que passei anteriormente funcionaria certinho se não fosse pelo looping que não parou no último registro... desde já agradeço pela ajuda
  5. Olá, fiz este código no evento AfterDelete de uma Table: tbCaixa.Prior; while not tbCaixa.Eof do begin total_anterior := tbCaixaTOTAL.AsFloat; tbCaixa.Next; tbCaixa.Edit; tbCaixaTOTAL.AsFloat := total_anterior + tbCaixaCREDITO.AsFloat - tbCaixaDEBITO.AsFloat; tbCaixa.Post; end; tbCaixa.Close; tbCaixa.Open; Porém, mesmo quando chega na última linha de registro da minha tabela ele continua realizando a ação dentro do while...alguém sabe porque e como arrumar isso? vlw
×
×
  • Criar Novo...