这是网上找到的方法
DWORD ExStyle;
        ExStyle = DWORD(::GetWindowLong(Edit1->Handle, GWL_EXSTYLE)) & (~WS_EX_RIGHT) & (~WS_EX_RTLREADING) & (~WS_EX_LEFTSCROLLBAR);
        ExStyle = ExStyle | WS_EX_RIGHT;
        ::SetWindowLong(Edit1->Handle, GWL_EXSTYLE, ExStyle   );
        Edit1->Invalidate();
但无论放在OnCreate或OnShow等处,都不能实现文字居右的显示。请教各位大侠还有什么方法。