程序运行正常，为什么读不出数据？(format函数运用）(5分)

我写的下面这段程序，运行正常，能正确读写数据，却不能读数据到format格式中，请问该如何让他读到format格式中？
procedure TForm1.Button1Click(Sender: TObject);
var
f:TIniFile;
x1,y1,x2,y2,gu:integer;
mapname:string;
begin
x1:=100;
x2:=200;
y1:=124;
y2:=130;
gu:=1;
mapname:='ssss';
f:=Tinifile.Create(ExtractFilePath(Application.ExeName)+'test.ini');
f.WriteString('测试','test1',format('地图(%s),坐标(%d,%d),(%d,%d),固定(%d)',[mapname,x1,y1,x2,y2,gu]));
f.WriteString('测试','test2',format('地图(%s),坐标(%d,%d),(%d,%d),固定(%d)',[mapname,x1,y1,x2,y2,gu]));
f.Free;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
f:TIniFile;
x1,y1,x2,y2,gu:integer;
mapname,readstr:string;
begin
f:=Tinifile.Create(ExtractFilePath(Application.ExeName)+'test.ini');
readstr:=f.readString('测试','test1',format('地图(%s),坐标(%d,%d),(%d,%d),固定(%d)',[mapname,x1,y1,x2,y2,gu]));
showmessage(format('地图(%s),坐标(%d,%d),(%d,%d),固定(%d)',[mapname,x1,y1,x2,y2,gu]));
showmessage(readstr);
f.Free;
end;