Duvida Na Forma De Emissão

[Claudio Stein Junior]

Olá estou usando o componente de Demo e alterando o mesmo e consta como forma de envio as seguintes opcoes no form:

 

1 = Normal

4 = EPEC

5 = Conting. FSDA

7 = SVC-RS

8 = SVC-SP

 

Para estes itens respectivos estou fazendo da seguinte forma:

 

if rgFormaEmissao.ItemIndex = 0 then
     Ide.tpEmis:=teNormal; //1 = Normal
else if rgFormaEmissao.ItemIndex = 1 then
    Ide.tpEmis:=teDPEC //4 = EPEC
else if rgFormaEmissao.ItemIndex = 2 then   
    Ide.tpEmis:=teFSDA //5 = Conting. FSDA
else if rgFormaEmissao.ItemIndex = 3 then    
    Ide.tpEmis:=teSVCRS //7 = SVC-RS
else if rgFormaEmissao.ItemIndex = 4 then   
    Ide.tpEmis:=teSVCSP; 8 = SVC-SP

Gostaria de saber se as correspondências estão corretas.

 

Obrigado

 

 

[Juliomar Marchetti]

Faz o seguinte, vai nesse código, segura o Ctrl e clica em tpEmis, ele vai ir para a classe, repita o procedimento mas dai para o tipo da propriedade e ele vai ir para o enumador, lá você vai ver a ordem!

lembrando que o índice vai começar em 0(zero) e não em 1(um)!

[Claudio Stein Junior]

Valeu!