TUpDown控件OnClick事件加入如下代码，出现异常！

[Chinaneu]

void __fastcall TForm1::UpDown1Click(TObject *Sender, TUDBtnType Button)
{
AnsiString s = "ABCD";
ShowMessage(s);
}
//---------------------------------------------------------------------------

编译运行后，点击UpDown的上下箭头会出现对话框显示“ABCD”，但当点击确定之后，鼠标再点击其它位置，也会弹出对话框，甚至关闭不了主窗体，不知为何？
win7（32位）+CB2009

[Chinaneu]

是不是bug？

[ccrun.com]

将这两行代码放在UpDown的OnMouseDown或OnMouseUp事件中。

[ccrun.com]

谈不上BUG，TUpDown控件创建的是Windows原生窗口。
只是在应用中需要注意一下某些细节。