菜鸟捉虫(47)

2001年第47期

上期正确答案：
　　 我们应该在“WITH imgCtrl [i] DO BEIGN”中加入Parent=Form1，如果没有指定Parent（即将该控件显示在何处），那么将无法显示出控件来。
　　 另一个错误在“OldTop:=imgCtrl.Top + Height+2”一句中，将其修改为OldTop:=imgCtrl[i-1].Top + Height+2;则可以正常显示出第三幅图片。
　　#2 获奖名单：
　　 江 苏 李中华
　　 上 海 程 平
　　 北 京 胡晓霞
　　 黑龙江 龙志高
　　 安 徽 鲍红军
　　 以上幸运读者将获得电脑报最新出品的《电脑报系列配套光盘》杂志一套。
　　#2 本期题目：
　　 将一串英文字符进行倒序排序。源码如下，由于源码中有错误，不能完成倒序排序，请将下面的代码进行修正：
　　 procedure TForm1.Button1Click（Sender: TObject）;
　　 var
　　 i，nLen: integer;
　　 strTemp，strText: String;
　　 begin
　　 strText:=Memo1.Text;
　　 nLen:=Length（strText）;
　　 FOR i:=nLen DownTo 1 DO
　　 BEGIN
　　 strTemp:=Copy（strText，nLen，1）;
　　 strTemp:=strTemp + strTemp;
　　 END;
　　 Memo1.Text:=strTemp;
　　 end;