以下是我在BCB上的代码,但应该是API函数了,WS_SIZEBOX是可以调整大小的,在调整好后,如何才能把空间变成不可调整大小的.因为WS_SIZEBOX会出现一个凸出的框,用户看了不习惯//修改此单字符串窗口组件性质,可自由缩放大小
DWORD dwStyle = ::GetWindowLong(Edit1->Handle, GWL_STYLE);
::SetWindowLong(Edit1->Handle, GWL_STYLE, dwStyle | WS_SIZEBOX);
//修正此单字符串窗口组件在Form1上的实际尺寸与范围
//以便USER直接调整单字符串窗口组件边沿
::MoveWindow(Edit1->Handle, Edit1->Left, Edit1->Top,
             Edit1->Width, Edit1->Height + 1, true);