Eigenschaften von Arrays

[fLaSh11]

Delphi-Quellcode:

for i:=0 to arraylength do
  begin
  if pos(array[i],s)<>0 then
    enthalten;
  end;