Fórum Enumereção #203410
29/12/2003
0
Olá galera, tenho uma rotina ao qual a utilizava em vb ( sem represões por favor ), e estou convertendo-a em Delphi, lá no vb eu utilizava enum para se referenciar a algumas constantes por exemplo ( em vb ):
[i:a1df09cbc8]Enum PosicaoDadoTabela
codigo = 0
nome = 1
endereco =2
.
.
.
End Enum[/i:a1df09cbc8]
E em qualquer lugar do codigo do from poderia utilizar:
[i:a1df09cbc8]msgbox PosicaoDadoTabela.Codigo[/i:a1df09cbc8]
Para me trazar o valor ao qual foi atribuido na enum.
Realizei varios testes e ao consegui reproduzir algo semelhante em Delphi tenhei types enumeradas do tipo:
[i:a1df09cbc8]type
PosicaoDadoTabela := (Codigo = 0, Nome =1,....)[/i:a1df09cbc8]
Mas nao consigo utilizar no codigo a sintax PosicaoDadoTabela.Codigo para me referenciar ao valor atribuido.
Alguem pode me ajudar com isso.
[i:a1df09cbc8]Enum PosicaoDadoTabela
codigo = 0
nome = 1
endereco =2
.
.
.
End Enum[/i:a1df09cbc8]
E em qualquer lugar do codigo do from poderia utilizar:
[i:a1df09cbc8]msgbox PosicaoDadoTabela.Codigo[/i:a1df09cbc8]
Para me trazar o valor ao qual foi atribuido na enum.
Realizei varios testes e ao consegui reproduzir algo semelhante em Delphi tenhei types enumeradas do tipo:
[i:a1df09cbc8]type
PosicaoDadoTabela := (Codigo = 0, Nome =1,....)[/i:a1df09cbc8]
Mas nao consigo utilizar no codigo a sintax PosicaoDadoTabela.Codigo para me referenciar ao valor atribuido.
Alguem pode me ajudar com isso.
Jsegoa
Curtir tópico
+ 0
Responder
Posts
29/12/2003
Beppe
Em Delphi não se qualifica os elementos de uma enumeração. Você coloca somente Codigo. Embora é comum prefixar com duas ou três letras o nome com um indicativo do tipo, para não poluir o espaço: pdtCodigo, pdtNome...
Responder
Gostei + 0
29/12/2003
Ggean
se os dados estiverem em dbgrid vc usa a posicao da coluna
dbgrid1.colunms[X];
na tTable use o table1.fields[X]
nao sei se isso ajuda, mas....
dbgrid1.colunms[X];
na tTable use o table1.fields[X]
nao sei se isso ajuda, mas....
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)