Array de string

Delphi

12/10/2005

Eu tenho um array de string já preenchido (constante) e gostaria de saber como faço um for no array pra saber se determidada string está contida nele ou não, exemplo:


 sNome := ´Fulano´;

 for ´Fulano´ in not meuArray do
    showmessage(Fulano não encontado no array);


Dá pra fazer algo semelhante a isto?

Obrigada


Celamar

Celamar

Curtidas 0

Respostas

Rjun

Rjun

12/10/2005

Por que você não usa um TStringList em vez de array para guardar suas strings? Assim você poderia utilizar o IndexOf.


GOSTEI 0
Raserafim

Raserafim

12/10/2005

celamar vc pode fazer o seguinte:
procedure...
var
  I: Integer;
begin
  for I := 0 to (Length(meuArray) -1) do
  begin
    if meuArray[I] = sNome then
    begin
      showmessage(sNome + ´ encontrado no array´);
      Break;
    end;
  end;
  if I > (Length(meuArray) -1) then
    showmessage(sNome + ´ não encontrado no array´); 
end;


se o tamanho do array for sempre o mesmo vc pode substituir (Length(meuArray) -1) pelo tamanho.


GOSTEI 0
Michael

Michael

12/10/2005

Olá!

Se a array é constante, seus valores não mudam e vc os conhece previamente, antes da execução do aplicativo. Então, qual a razão de verificar se algum deles existe?

[]´s


GOSTEI 0
POSTAR