编辑框文本垂直居中例程

易语言文本垂直居中源码结合易语言系统核心支持库，实现了文本在编辑框内垂直居中的效果。
子程序 文本垂直居中(传值 hWin 为 HWND)
变量 rect 为 RECT

SendMessage(hWin,EM_GETRECT,0,转换类型(LPARAM,@rect)) '获取一个编辑控件的格式化矩形
OffsetRect(@rect,0,(rect.bottom-rect.top)/2-8)
SendMessage(hWin,EM_SETRECT,0,转换类型(LPARAM,@rect)) '只对多行编辑框有效
结束 子程序