初学DELPHI求前辈们指点！

小弟初学DELPHI。跟着视频学做了乘法口诀表，代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
s:String;
i,j,result:Integer;
begin
      for i:=1 to 9 do
      begin
      S:=' ';
      for j:=1 to i do
        begin
        result:=j*i;
        s:=s+IntToStr(j)+'x'+IntToStr(i)+'='+IntToStr(result)+'  ';
        end;
        canvas.TextOut(20,20*i,s);
      end;
end;
运行后是一个正三角分布的乘法口诀表。现如今我想修改成倒三角，就是从9乘到1的乘法口诀表。不知道要怎么修改。还请各位前辈不吝赐教。

---

      for i:=1 to 9 do
改为
      for i:=9 downto 1 do

---

引用

      for i:=1 to 9 do
改为
      for i:=9 downto 1 do

你的方法我早就是试过。。但是修改以后运行无任何显示了。

---

引用

或者把
        canvas.TextOut(20,20*i,s);
改为
        canvas.TextOut(20,20*(10-i),s);
试一试

这个方法可以通过。感谢你的回复。