Fórum Como descobrir o tipo de uma variável??? #252315
28/09/2004
0
Por exemplo:
Se o valor da variável for String eu tenho que usar WriteString...
Alguém sabe como fazer isso?
Obrigado.

S
Curtir tópico
+ 0Posts
28/09/2004
Lucas Silva
se só tiver letras você coloca ela como String;....
tipo:
1 2 3 | for i:= to Length(texto) do if texto[i] in [´a´..´z´] then ..... |
Na verdade eu acho que você poderia jogar String pra todas as variáveis, iria ficar bem mais fácil pra você.
Gostei + 0
28/09/2004
S
Gostei + 0
28/09/2004
Lucas Silva
Realmente nunca vi este método...
Já vi para descobrir o tipo de campo do banco de dados!
Gostei + 0
28/09/2004
Beppe
Digamos que vc tenha as variaveis UmInteiro e UmaString:
1 2 | Reg.WriteInteger(..., UmInteiro, ...) Reg.WriteString(..., UmaString, ...) |
Gostei + 0
28/09/2004
Dedi
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | //580 - Retorna que tipo de variavel é function Tform1.GetVariantType(const v: variant): string; begin case TVarData(v).vType of varEmpty: result := ´Empty´; varNull: result := ´Null´; varSmallInt: result := ´SmallInt´; varInteger: result := ´Integer´; varSingle: result := ´Single´; varDouble: result := ´Double´; varCurrency: result := ´Currency´; varDate: result := ´Date´; varOleStr: result := ´OleStr´; varDispatch: result := ´Dispatch´; varError: result := ´Error´; varBoolean: result := ´Boolean´; varVariant: result := ´Variant´; varUnknown: result := ´Unknown´; varByte: result := ´Byte´; varString: result := ´String´; varTypeMask: result := ´TypeMask´; varArray: result := ´Array´; varByRef: result := ´ByRef´; end; end; |
credito: 800 dicas
Gostei + 0
28/09/2004
Aroldo Zanela
Veja [b:0819165a64]VarType [/b:0819165a64]no Help.
Gostei + 0
06/10/2004
Wmcaetani
Gostei + 0
06/10/2004
Aroldo Zanela
Colega,
Com certeza ele está se referindo a tipos [b:44fd36694d][color=red:44fd36694d]Variants [/color:44fd36694d][/b:44fd36694d]e para isso o Delphi possui a função [b:44fd36694d]VarType[/b:44fd36694d].
Gostei + 0
23/08/2016
Gustavo Reis
Gostei + 0
23/08/2016
Raimundo Pereira
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)