variable array abfragen?

[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!