Tipo por string
23/02/2006
0
Pessoal tenho o seguinte:
depois tenho uma função que recebe 2 strings
pois [b:5422f282da]Incompatible types: ´TTipoOperacao´ and ´string´[/b:5422f282da]
TTipoOperacao = (Inserir, alterar, excluir); TOperacao = record Operacao: TtipoOperacao; codigo: integer; end;
depois tenho uma função que recebe 2 strings
OP.codigo:= strtoint(string1); OP.Operacao:= string2; <- aqui não funciona
pois [b:5422f282da]Incompatible types: ´TTipoOperacao´ and ´string´[/b:5422f282da]
Sistemald
Curtir tópico
+ 0
Responder
Posts
23/02/2006
_rodfaria_
[url]http://delphi.about.com/cs/adptips2003/a/bltip0203_5.htm[/url]
OP.Operacao:= TTipoOperacao(GetEnumValue(TypeInfo(TTipoOperacao),string2));
OP.Operacao:= TTipoOperacao(GetEnumValue(TypeInfo(TTipoOperacao),string2));
Responder
24/02/2006
Sistemald
oi,
valeu, era isso mesmo que eu queria.
lembre-se que tem que declarar [b:1be6ae66cb]TypInfo[/b:1be6ae66cb].
valeu!
valeu, era isso mesmo que eu queria.
lembre-se que tem que declarar [b:1be6ae66cb]TypInfo[/b:1be6ae66cb].
valeu!
Responder
Clique aqui para fazer login e interagir na Comunidade :)