微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题菜鸟捉虫(47)
栏目软件世界
发布2001年47期
  上期正确答案:
  我们应该在“WITH imgCtrl [i] DO BEIGN”中加入Parent=Form1,如果没有指定Parent(即将该控件显示在何处),那么将无法显示出控件来。
  另一个错误在“OldTop:=imgCtrl.Top + Height+2”一句中,将其修改为OldTop:=imgCtrl[i-1].Top + Height+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;