在Form的OnResize中写代码:
Label1.Left := (Width - Label1.Width) div 2;
Label1.Top := (Height - Label1.Height) div 2;
Label1.Left := (Width - Label1.Width) div 2;
Label1.Top := (Height - Label1.Height) div 2;
解决方案 »
- delphi
- 关于窗口显示,隐藏的问题
- sql查询中,查询表达式是变量怎么赋值啊?
- 难解之数据库查询替代,急!
- 怎样将TOleStream的值写到TMemoryStream内
- 在(x,y)处已画了一图形,如何避免后面画的图不覆盖该图,可否设一此地方已被占领的标志?
- 为什么第二次调用EXCEL时数据还是导出到第一个工作表?
- 绝对容易,绝对给分。。。。。。。
- 为什么这样的权限控制无法达到目的?
- 我的笔记本电脑为什么不能联网???(这里有联想的人吗???)????
- 请教一个问题,窗口上有一个checkbox,当点击时,窗体的下部分为不可显示,再点击可显示全部窗口
- Internet上如何连接mssqlserver?用什么控件?ADO?Internet?Midas?
二:alignment为:taCenter
三:layout为:tlCenter
行了。
Label1.Left := (Width - Label1.Width) div 2;
Label1.Top := (Height - Label1.Height) div 2;
这样更好