Fórum Saldo em DBGrid #224236

Olá Amigo.

Usando Paradox esperimente fazer assim:


procedure TfrmCaixa.Button1Click(Sender: TObject);
var
Saldo:Variant;
begin

Table1.First;
Table1.Edit;
Table1.FieldByName(´Saldo´).Value :=Table1.FieldByName(´DEBITO´).Value - Table1.FieldByName(´CREDITO´).Value;
Saldo:= Table1.FieldByName(´Saldo´).Value;
Table1.Next;

While Not Table1.Eof Do
Begin
Table1.Edit;
Table1.FieldByName(´Saldo´).Value := Saldo + Table1.FieldByName(´DEBITO´).Value - Table1.FieldByName(´CREDITO´).Value;
Saldo:= Table1.FieldByName(´Saldo´).Value;
Table1.Next;
end;

end;

Foi um quebra galho que consegui fazer!
T+
Humberto Duarte

Saldo é uma coluna do DBGrid e tem que ser mostrada dinamicamente, pois eu posso estar no dia 20 e fazer um lancamento no dia 10 o que teria que forcar o recalculo dos saldos ate o dia 20 de novo.

Eu acho que isto não é uma boa idéia...se for um livro caixa é mais [b:281d48c57a]aconselhável [/b:281d48c57a]um lançamento[b:281d48c57a] fora data correta [/b:281d48c57a]do que uma [b:281d48c57a]edição [/b:281d48c57a]nos registros anteriores..[b:281d48c57a]Não é prático, não é seguro e não é permitido...[/b:281d48c57a]
[b:281d48c57a]Não é Prático Porque [/b:281d48c57a]:?: Pelo motivo exposto por voce mesmo...Uma correção em um Campo Implica em correções em todos os campos Posteriores...
[b:281d48c57a]Não é seguro Porque [/b:281d48c57a]:?: dependendo da utilidade do programa ,Pode gera possíveis Fraudes ou mesmo roubo por pessaos de mã fé...Fica difícil controlar...em se tratando de 20 registro tudo bem, mas a coisa complica quanto o banco de dados tem muita informação...em posse disto, o larápio altera a base de dados do ano retrassado, inventando por exemplo uma despesa que não existiu...Quem de via de direito vai conferir registros antigos :(
[b:281d48c57a]Não é permitido Porque [/b:281d48c57a]:?: Isto já é mais ´técnico´ do que qualquer outra coisa. Um livro[b:281d48c57a] caixa [/b:281d48c57a]feito a mão , não pode ter [b:281d48c57a]rasuras[/b:281d48c57a], e uma [b:281d48c57a]edição[/b:281d48c57a] e uma rasura ´elegante´...Mas se de posse de todas estas opiniões não se deu por vencido, ou este definitivamente, não for o seu caso, vamos tentar programar para resolver o problema:
declare quatro variáveis
no método edit Faça:

Faça as alterações Que lhe couver...Na Hora De Gravar No Registro Alterado
Crie agora um [b:281d48c57a]Método[/b:281d48c57a] Para Todos os [b:281d48c57a]Registros Posteriores [/b:281d48c57a]a Este Registro altere o seu [b:281d48c57a]campo saldo[/b:281d48c57a]... O Novo Valor do Campo Saldo é

A Dificuldade agora talves seja criar este método, para selecionar estes registros posteriores, se não conseguir poste para gente...