Ajuda Com Add();

[datilas]

eu fiz o componente AcbrSedex, mas estou com dificuldade de incrementar ele, pois eu vi que é possivel fazer calculo de sedex e rastrear objetos em um mesmo get,

hoje funciona assim:

 

ACBrSedex1.CodContrato := EdtContrato.Text;
ACBrSedex1.Senha := EdtSenha.Text;
ACBrSedex1.CepOrigem := EditCEPOrigem.Text;
ACBrSedex1.CepDestino := EditCEPDestino.Text;
ACBrSedex1.Peso := StrToFloatDef(EditPeso.Text,0);
ACBrSedex1.Formato := TACBrTpFormato(cbFormato.ItemIndex);
ACBrSedex1.MaoPropria := TACBrMaoPropria(cbMaoPropria.ItemIndex);
ACBrSedex1.AvisoRecebimento := TACBrAvisoRecebimento(cbAvisoReceb.ItemIndex);
ACBrSedex1.Comprimento := StrToFloatDef(EditComprimento.Text,0);
ACBrSedex1.Largura := StrToFloatDef(EditLargura.Text,0);
ACBrSedex1.Altura := StrToFloatDef(EditAltura.Text,0);
ACBrSedex1.Servico := TACBrTpServico(cbServico.ItemIndex);
ACBrSedex1.Diametro := StrToFloatDef(EditDiametro.Text,0);
ACBrSedex1.ValorDeclarado := StrToFloatDef(EditValorDeclarado.Text,0);

 

mas eu gostaria de fazer assim:

 

ACBrSedex1.CodContrato := EdtContrato.Text;
ACBrSedex1.Senha := EdtSenha.Text;
ACBrSedex1.CepOrigem := EditCEPOrigem.Text;
ACBrSedex1.CepDestino := EditCEPDestino.Text;
ACBrSedex1.Peso := StrToFloatDef(EditPeso.Text,0);
ACBrSedex1.Formato := TACBrTpFormato(cbFormato.ItemIndex);
ACBrSedex1.MaoPropria := TACBrMaoPropria(cbMaoPropria.ItemIndex);
ACBrSedex1.AvisoRecebimento := TACBrAvisoRecebimento(cbAvisoReceb.ItemIndex);
ACBrSedex1.Comprimento := StrToFloatDef(EditComprimento.Text,0);
ACBrSedex1.Largura := StrToFloatDef(EditLargura.Text,0);
ACBrSedex1.Altura := StrToFloatDef(EditAltura.Text,0);

ACBrSedex1.Servico.add(tiposervoco1);
ACBrSedex1.Servico.add(tiposervoco2);
...

ACBrSedex1.Diametro := StrToFloatDef(EditDiametro.Text,0); ACBrSedex1.ValorDeclarado := StrToFloatDef(EditValorDeclarado.Text,0);

 

 

a duvida é como eu faço esse add

qual o tipo de variavel, property ...

 

ja olhei nos outros componentes do acbr mas não consegui entender

Editado 25 Setembro, 2014 por datilas

[Régys Silveira]

Serviço tem que ser uma lista, existem implementações de lista em praticamente todos os componentes, o que mais usam são sintegra, sped, cniee, tudo que lista mais de 1 item.

[datilas]

Serviço tem que ser uma lista, existem implementações de lista em praticamente todos os componentes, o que mais usam são sintegra, sped, cniee, tudo que lista mais de 1 item.

muito obrigado vou tentar