菜鸟捉虫(47)
?牐犖颐怯Ω迷凇癢ITH imgCtrl [i] DO BEIGN”中加入Parent=Form1，如果没有指定Parent（即将该控件显示在何处），那么将无法显示出控件来。
?牐犃硪桓龃砦笤凇癘ldTop:=imgCtrl.Top + Height+2”一句中，将其修改为OldTop:=imgCtrl[i-1].Top + Height+2;则可以正常显示出第三幅图片。
#2?牐牷窠泵ィ?
?牐牻? 苏 李中华
?牐犐? 海 程 平
?牐牨? 京 胡晓霞
?牐牶诹? 龙志高
?牐牥? 徽 鲍红军
?牐犚陨闲以硕琳呓竦玫缒员ㄗ钚鲁銎返摹兜缒员ㄏ盗信涮坠馀獭吩又疽惶住?
#2?牐牨酒谔饽浚?
?牐牻淮⑽淖址械剐蚺判颉Ｔ绰肴缦拢捎谠绰胫杏写砦螅荒芡瓿傻剐蚺判颍虢旅娴拇虢行拚?
?牐爌rocedure TForm1.Button1Click（Sender: TObject）;
?牐爒ar
?牐爄，nLen: integer;
?牐爏trTemp，strText: String;
?牐燽egin
?牐爏trText:=Memo1.Text;
?牐爊Len:=Length（strText）;
?牐燜OR i:=nLen DownTo 1 DO
?牐燘EGIN
?牐爏trTemp:=Copy（strText，nLen，1）;
?牐爏trTemp:=strTemp + strTemp;
?牐燛ND;
?牐燤emo1.Text:=strTemp;
?牐爀nd;