variable array abfragen?

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