Fórum TypeCast String em um Type. #267625
06/02/2005
0
Olá amigos,
Pessoal estou tento um erro quando tento fazer um typecast String em um Type que tenho registrado.
Meu tipo é:
Código. NomeTabela : String; Tabela : TTabelasExistentes (Meu Tipo)
O Erro que está dando é [Error] cIdTabelas.pas(47): Incompatible types: ´String´ and ´TTabelasExistentes´
Existe alguma saida para isso ?
Obrigado.
Abraços.
Yalle Cunha :roll:
Pessoal estou tento um erro quando tento fazer um typecast String em um Type que tenho registrado.
Meu tipo é:
Type
TTabelasExistentes = (IdCliente,IdPedido,IdVendedor,IdFornecedor,IdProduto,IdBoleto);
Código. NomeTabela : String; Tabela : TTabelasExistentes (Meu Tipo)
NomeTabela := Concat(´Id´,Tabela);
NomeTabela := ´Id´ + Tabela
O Erro que está dando é [Error] cIdTabelas.pas(47): Incompatible types: ´String´ and ´TTabelasExistentes´
Existe alguma saida para isso ?
Obrigado.
Abraços.
Yalle Cunha :roll:
Yallebr
Curtir tópico
+ 0
Responder
Posts
06/02/2005
Beppe
Claro, pq um tipo enumerado é um tipo especial de número. Mas existe a função GetEnumName(inclua a unit TypInfo) para obter seu nome.
NomeTabela := ´Id´ + GetEnumName(TypeInfo(TTabelasExistentes), Ord(Tabela))
NomeTabela := ´Id´ + GetEnumName(TypeInfo(TTabelasExistentes), Ord(Tabela))
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)