Retificando, o nome da função é AnsiIndexStr(). Informe-se sobre ela no help
do Delphi.

Sds.

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Rubem Rocha
Enviada em: sexta-feira, 4 de dezembro de 2009 16:17
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Testar string
Prioridade: Alta

 

  

Faça assim:

case AnsIndexStr(stParametro262, [‘00’, ‘01’, ‘02’, ‘03’, ‘ 04’, ‘05’, ‘06’,
‘07’, ‘08’]) of

0: ShowMessage(’00’); // é o primeiro elemento

1: ShowMessage(‘01’); // é o segundo elemento

{ ... e por aí vai! }

end;

A estrutura case do Object Pascal só pode ser usada, até então, com tipos de
dados ordinais (byte, boolean, integer, word, etc.) e tipos enumerados. No
RAD Studio 2010 vc pode fazer case com strings. Abaixo disso, só usando algo
semelhante ao que eu sugeri.

Até onde tenho conhecimento, é isso!

Sds.

De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
[mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
] Em
nome de Berdam
Enviada em: sexta-feira, 4 de dezembro de 2009 16:14
Para: Delphi
Assunto: [delphi-br] Testar string

Existe a possibilidade de realizar este teste em delphi sendo a variavel
stparametro262 uma string ??

Com char é possível, mas com string é ??

if stParametro262 <> ['00', '01', '02', '03', '04', '05', '06', '07', '08']
then




 



[As partes desta mensagem que não continham texto foram removidas]

Responder a