Delphi中如何修改TEdit组件文本的垂直居中显示？

本文共计265个文字，预计阅读时间需要2分钟。

在TEdit（或TCombo、TButtonedEdit）中，文本起始位置与顶部对齐。我没有找到任何属性来改变对齐方式。通常这并不是问题，除非我想设置更大的字体。我搜索了一下，找到了一些解决方案，可以通过发送Win消息来实现。

TEdit(或TCombo,TButtonedEdit)中的文本始终与顶部对齐.我没有找到任何属性来改变对齐方式.通常这不是问题,除非我想设置更大的高度.

我用Google搜索了一下.有一些解决方案可以通过发送Windows消息来调整左边距和右边距.但我不知道如何调整垂直对齐方式.

我不想使用更大的字体.有任何想法吗？

如果有这样的选项,它将通过一种风格来应用. EDIT control styles list不包含这样的样式,因此结论是底层控件不提供此功能.

你必须要么做一个新的控制,要么自己接管绘画.两者都没有特别吸引人.