delphi下字符串数组怎么用啊？(50分)

我想定义一个类似下面结构的字符串数组，
var
MapFile : array[0..14] of string = ('烟草销售点.tab',
'烟草销售点.map',
'烟草销售点.id',
'烟草销售点.dat',
'烟草销售点.idx',
'片区图.tab',
'片区图.map',
'片区图.id',
'片区图.dat',
'片区图.idx',
'大区图.tab',
'大区图.map',
'大区图.id',
'大区图.dat',
'大区图.idx');


＝＝＝＝＝＝＝＝
然后有下面语句一次读出：
for i := 0 to 14 do begin //14为MapFile数组的长度
showmessage( MapFile);
end;

结果告诉我string和integer类型不匹配。
在pascal下类似的语句应该怎么写？在线等待。

用tstringlist吧。

我不知道你是怎么用的
我在delphi5.0下编译一切正常

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
MapFile : array[0..14] of string = ('烟草销售点.tab',
'烟草销售点.map',
'烟草销售点.id',
'烟草销售点.dat',
'烟草销售点.idx',
'片区图.tab',
'片区图.map',
'片区图.id',
'片区图.dat',
'片区图.idx',
'大区图.tab',
'大区图.map',
'大区图.id',
'大区图.dat',
'大区图.idx');


implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i := 0 to 14 do begin //14为MapFile数组的长度
showmessage( MapFile);
end;

end;

end.

procedure TForm1.Button1Click(Sender: TObject);
const
MapFile : array[0..14] of string = ('烟草销售点.tab',
'烟草销售点.map',
'烟草销售点.id',
'烟草销售点.dat',
'烟草销售点.idx',
'片区图.tab',
'片区图.map',
'片区图.id',
'片区图.dat',
'片区图.idx',
'大区图.tab',
'大区图.map',
'大区图.id',
'大区图.dat',
'大区图.idx');


var
i : integer;
begin
for i := 0 to 14 do begin //14为MapFile数组的长度
showmessage( MapFile);
end;

end;

下面已测试通过
procedure TForm1.Button1Click(Sender: TObject);
const
MapFile : array[0..14] of string = ('烟草销售点.tab',
'烟草销售点.map',
'烟草销售点.id',
'烟草销售点.dat',
'烟草销售点.idx',
'片区图.tab',
'片区图.map',
'片区图.id',
'片区图.dat',
'片区图.idx',
'大区图.tab',
'大区图.map',
'大区图.id',
'大区图.dat',
'大区图.idx');

var
i:integer;
begin

for i := 0 to 14 do begin //14为MapFile数组的长度
showmessage( MapFile);
end;

类似这样的东东,我一般都是用TStringList,省心,呵呵

我知道怎么回事了，我别的地方写错了，呵呵
还是Tstringlist好用[][]