delphi Array声明和遍历

const

    BALISES : Array[0..3] of String = ( 'src="', 'href="', 'SRC="', 'HREF="' );

begin

  for i:=0 to 3 do begin

   //BALISES[i]； 这类循环遍历出上面的参数

  end;