variable array abfragen?

[NoobBoob]

kann ich mit einer variable wo z.b. das wort hallo gespeichert ist , abfragen ob hallo in einer array gespeichert ist? (0-10)
also sowas wie

if variable2 = array2[0..10] then
showmessage('Ist gleich')
else
showmessage('keine übereinstimmung');

das geht natürlich nicht ^^

[Harry M.]

Delphi-Quellcode:

function IsInArray(S: String): Boolean;
var
  I: Integer;
begin
  Result := False;
  for I := Low(MyArray) to High(MyArray) do
   if MyArray[I] = S then begin
    Result := true;
    break;
    end;
end;

procedure Bla;
begin
  if IsInArray('irgendwas' then
    showmessage('is drinne')
    else
    showmessage('nö, is nich');
end;

Nicht gestest!

[NoobBoob]

geht noch leichter?

oder geht vielleicht
array mit array testen?

also ob array1[1] in der array array2 vorhanden ist

[Harry M.]

Delphi-Quellcode:

procedure Bla;
var
  I: Integer; 
begin 
  for I := Low(YourArray2) to high(YourArray2) do
  if IsInMyArray(YourArray2[I]) then 
    showmessage(YourArray2[I] + ' is drinne') 
    else 
    showmessage(YourArray2[I] + ' nö, is nich'); 
end;