Como vincular as formas de pagamento cadastradas com as que devem ser passadas para o componente ?

[Alencar Castro]

Boa tarde !

 

Estou desenvolvendo um app de vendas com emissão de nota, queria saber como vincular as formas de pagamento que estão cadastradas no banco com as que tem que ser informada ? Estou usando um combobox para mostrar as formas de pagamento.

Formas de pagamento que devem ser informadas.

Na hora de informar o meio de pagamento tem que ser informado assim:

 

Não posso informar assim por exemplo ?

[BigWings]

Não, mas pode fazer assim:

uses
  pcnConversao;

[...]

var
  ok: Boolean;
begin
[...]
with pag.New do
begin
  tPag := StrToFormaPagamento(ok, '01'); // código de acordo com o manual da NFe
  vPag := 100.00;
end;

 

[Alencar Castro]

16 horas atrás, BigWings disse:

Não, mas pode fazer assim:

uses
  pcnConversao;

[...]

var
  ok: Boolean;
begin
[...]
with pag.New do
begin
  tPag := StrToFormaPagamento(ok, '01'); // código de acordo com o manual da NFe
  vPag := 100.00;
end;

 

Mas se eu tiver uma forma de pagamento como "Dinheiro", como eu converto essa string para o tipo que tenho que informar para o componente ?

[BigWings]

2 minutos atrás, Alencar Castro disse:

Mas se eu tiver uma forma de pagamento como "Dinheiro", como eu converto essa string para o tipo que tenho que informar para o componente ?

Você pode usar a função StrToEnumerado da unit pcnConversao.

Exemplos de como implementar não faltam nessa unit.

Mas eu não recomendo usar a descrição como chave, e sim ter o código na tabela de meios de pagamento.

[Alencar Castro]

18 minutos atrás, BigWings disse:

Você pode usar a função StrToEnumerado da unit pcnConversao.

Exemplos de como implementar não faltam nessa unit.

Mas eu não recomendo usar a descrição como chave, e sim ter o código na tabela de meios de pagamento.

Muito obrigado ! Entendi agora.