原理见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端=========