Question

delphi中关于memo1高度设置问题

我用delphi模仿windows记事本。一开始StatusBar是隐藏的(他的高度是19)。然后memo1的height和width都是随窗体变化的。memo1.height:=form1.height-54;memo1.width:=form1.width-8;运行显示正常的。但是在主菜单把状态栏显示后memo1.height:=form1.height-73;为什么这里减掉后窗体还是会出现滚动条。然后我查看memo1的高度值发现居然没有被减掉为什么？

Answer 1

做这种东东的时候不要去计算它的高度，因为MainMenu是默认置顶的，而状态栏的align:=albottom，因此只要你设置Memo.align=alclient;它就会自动调整了，你在菜单事件中就只需要色设置Statusbar的隐藏与显示。