原理見http://202.38.73.222/~pjf/blog/archives/000040.html代碼如下:====================== form1.dfm == ========================= ==對象form1:tform1左= 192 top = 107寬度= 396高= 261 caption ='form1'color = clbtnface font.chareet = default_charset font.color = clwindowtext font.height.height = -11 font = -11 font.name =' 'font.Style = [] oldCreateOrder = false otCreate = formCreate onDestroy = formDestroy Pixelsperinch = 96 textheight = 13對象button1:tbutton button1:tbutton左= 0 top = 0 top = 152 width = 89 height = 89高度對象memo1:tmemo左= 0 top = 0 width = 385高= 145 scrollbars = ssboth taborder = 1結束對象按鈕2: tbutton左= 0 top = 0 top = 184 width = 89高度= 89高度= 25字幕= 25個字幕='button2'tabord = 2端對象按鈕3:tbutton左= 120 top = 184寬度= 89高= 25字幕='button 3'taborder = 3 onclick = button3click end end end end end端=========