写了一个自动查找匹配的输入框，遇到一个界面风格的问题？那位高手能给予解决？(50分)

我最近写了一个控件，实现功能类似大富翁论坛登陆时输入用户名的输入框，
当双击此框或者在此框中输入数据时，弹出一个下拉框，显示所有匹配的选项，
我使用TListBox来显示这些选项，我将其Ctrl3D＝false，但是仍然无法实现拉动右下角
的图标来改变ListBox大小的功能，如果在CreateParams中添加如下代码，倒是可以实现
通过拉动右下角的图标改变ListBox的大小，但是界面又有了3D效果（Ctrl3D好像失去了作用）
有哪位高人能够帮忙解决一下？（我想实现的界面效果和大富翁论坛登陆时输入用户名的输入框
的下拉框界面效果一致）

上贴中忘了加代码了，添加如下代码可实现拉动的效果，但是同时增加了3D的效果，
我想去掉3D效果怎么做
procedure TMyListBox.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.Style := Params.Style and (not WS_EX_CLIENTEDGE) or WS_EX_RIGHT or WS_THICKFRAME;
end;

up

等待回答中