 |
ActiveDelphi .: O site do programador Delphi! :.
|
| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
rodrigob Novato

Registrado: Quarta-Feira, 16 de Fevereiro de 2011 Mensagens: 50
|
Enviada: Qua Fev 16, 2011 11:36 am Assunto: formulas matematicas [ Resolvido ] |
|
|
Olá, sou iniciante em delphi, e estou com a seguinte dúvida. Tenho um form que tem os seguintes campos:
Saldo anterior
Entrada
Saída
Saldo
Nestes campos, o usuário digitara o saldo anterior, a entrada e a saída
quando pressionado um botão o campo saldo é preenchido automaticamente.
formula: saldo= (entrada + saldo anterior) - saida
Queria saber como fazer a programação no botão. 
Editado pela última vez por rodrigob em Qua Fev 16, 2011 4:41 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
alexbandeira Mestre


Registrado: Terça-Feira, 27 de Julho de 2004 Mensagens: 812 Localização: Paulista - PE
|
Enviada: Qua Fev 16, 2011 12:03 pm Assunto: |
|
|
Cara tenta assim:
EdtSaldo.Text:=FormatCurr('R$ #,##0.00',(StrToCurr(edtEntrada.Text)+
StrToCurr(edtsaldoAnterior.Text))-
StrToCurr(edtsaida.Text));
Mas vou te dar uma dica, busca automaticamente o saldo anterior da tabela, desta forma o usuário ñ precisa nem digitar nem procurar se ele não souber decorado. Vai facilitar a vida do usuário.
Espero tyer ajudado. _________________ Conhecemos um grande homem pelas pequenas atitudes. |
|
| Voltar ao Topo |
|
 |
rodrigob Novato

Registrado: Quarta-Feira, 16 de Fevereiro de 2011 Mensagens: 50
|
Enviada: Qua Fev 16, 2011 1:55 pm Assunto: |
|
|
| alexbandeira escreveu: | Cara tenta assim:
EdtSaldo.Text:=FormatCurr('R$ #,##0.00',(StrToCurr(edtEntrada.Text)+
StrToCurr(edtsaldoAnterior.Text))-
StrToCurr(edtsaida.Text));
Mas vou te dar uma dica, busca automaticamente o saldo anterior da tabela, desta forma o usuário ñ precisa nem digitar nem procurar se ele não souber decorado. Vai facilitar a vida do usuário.
Espero tyer ajudado. |
Muito Obrigado pela ajuda, funcionou perfeitamente, é uma ótima idéia sua buscar o saldo anterior automaticamente, mas como poderia fazer isso. Desculpe pela ignorância, é que estou iniciando na programação! |
|
| Voltar ao Topo |
|
 |
alexbandeira Mestre


Registrado: Terça-Feira, 27 de Julho de 2004 Mensagens: 812 Localização: Paulista - PE
|
Enviada: Qua Fev 16, 2011 3:46 pm Assunto: |
|
|
Tudo bem,
Suponho q estejas armazenando isso em uma tbl, não? Se não é bom pençar nisto.
Com o vl armazenado é só busca-lo no referido campo da tbl.
edtsaldoAnterior.Text:=dm.tblCampoSaldoAnterior.Value;
ou
edtsaldoAnterior.Text:=FormatCurr('#00.00',dm.tblCampoSaldoAnterior.Value);
Não se esqueça de editar o titulo p/ "titulo + [Resolvido]", hem! _________________ Conhecemos um grande homem pelas pequenas atitudes. |
|
| Voltar ao Topo |
|
 |
rodrigob Novato

Registrado: Quarta-Feira, 16 de Fevereiro de 2011 Mensagens: 50
|
Enviada: Qui Fev 17, 2011 8:50 am Assunto: |
|
|
| alexbandeira escreveu: | Tudo bem,
Suponho q estejas armazenando isso em uma tbl, não? Se não é bom pençar nisto.
Com o vl armazenado é só busca-lo no referido campo da tbl.
edtsaldoAnterior.Text:=dm.tblCampoSaldoAnterior.Value;
ou
edtsaldoAnterior.Text:=FormatCurr('#00.00',dm.tblCampoSaldoAnterior.Value);
Não se esqueça de editar o titulo p/ "titulo + [Resolvido]", hem! |
Cara não deu muito certo, coloquei no evento Change do edit:
edt_Anterior.Text:=dm.produtos.Value;
só que na hora de compilar da o seguinte erro:
Undeclared identifier: 'value'
----------------------------
Minha intenção é cadastrar produtos, cada produto se difere por um tipo (perecivel, não perecivel e bebidas) validade do produto, marca, gênero ( arroz, feijão etc.), mês de referencia.
Ex. Quando cadastrar um determinado produto de gênero ex. Lentilha no mês de referencia fevereiro,automaticamente o sistema ira buscar no banco a lentilha de mesma marca do mês de janeiro e jogar para o campo saldo atual o saldo de lentilhas do mês de Janeiro.
Será que é possível tal operação?
Estou usando o access conectado pelo objeto ADOCONNECTION |
|
| Voltar ao Topo |
|
 |
NinjaGamePlayer Membro Junior

Registrado: Sexta-Feira, 30 de Janeiro de 2009 Mensagens: 352
|
Enviada: Qui Fev 17, 2011 9:54 pm Assunto: |
|
|
Parece que a propriedade Value não existe no dm.produtos:
edt_Anterior.Text:=dm.produtos.Value;
Verifique |
|
| Voltar ao Topo |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|