If com In (existe?)

Question

Ola Pessoal.. uma perguntinha..existe condi��es de fazer o �if�.. com um �in� ..ou coisa parecida...tipo: if querycodigos �in� �variavel� then begin tem como??estou no aguardo..obrigado.....

Massuda · Answer

Existir, existe. Por exemplo:[code:1:4087822c9f]const  CaracteresV�lidos = &#91;�A�..�Z�, �a�..�z�, �0�..�9�&93;;var  C: Char;...  if C in CaracteresV�lidos then     // C � um caractere v�lido  else    // C � um caractere inv�lido[/code:1:4087822c9f]Note que o [b:4087822c9f]in[/b:4087822c9f] s� se aplica a [b:4087822c9f]set[/b:4087822c9f]s (conjuntos). Um [b:4087822c9f]set[/b:4087822c9f] re�ne valores ordinais ou enumerados.Mas provavelmente n�o � isso que voc� deseja.Se quiser testar se uma string est� contida em outra, use a fun��o Pos....

Thiago Coleti · Answer

Ol� Massuda..o q eu quero � comparar uma valor de um campo de uma query com os valores de uma v�riavel..ex:tenho a variavel codigos(string) com os valores: �100�,�200�,�300�quero verificar se o valor do campo da query est� dentro desses numeros...[code:1:9fc8745bbb]if querycampocodigo.value in codigos then <executa>[/code:1:9fc8745bbb]sera q funfa???valew...

Massuda · Answer

[b:260e4ce1c4]set[/b:260e4ce1c4]s s� trabalham com n�meros (ordinais ou enumera��es) dentro de uma faixa limitada de valores, n�o trabalham com strings.

Uma possibilidade (n�o testei) seria fazer...

if querycampocodigo.AsInteger in [100, 200, 300] then <executa>

Thiago Coleti · Answer

Ol� Massuda... naum consegui fazer funcionar naum...

eu criei uma variavel string q em um looping em um campo string de uma tabela eu coloco os valores nela(variavel)... no caso 00100, 00200, 00300

eu presciso comparar com um campo da query q � string.... e at� agora nada....

alguma id�ia?

Dopi · Answer

Use o [b:434e517851]POS[/b:434e517851] para saber se a Sub-String que vc procura est� dentro do �conjunto� (String)

Primeiro crie a v�riavel [b:434e517851]codigo [/b:434e517851]separando os valores v�lidos usando um �separador� qualquer... Exemplo, usando �|� como separador

Codigo := "100|200|400|300" ;
if pos(querycampocodigo.value,codigos) > 0 then <executa>

Thiago Coleti · Answer

Dopi..valew pela ajuda... o POS resolveu meu problema aki...Massuda..obrigado pela ajuda. tmb.... n�o conhecia a relac�o do If com o In..valew galera.....

F�rum If com In (existe?) #333067