怎样移动无标题栏窗口?
问题点数:20、回复次数:8Top
1 楼ggyy(带着一堆光棍找朋友!)回复于 2001-11-29 19:56:53 得分 0
setwindowspos()Top
2 楼HorkyTao(雨人)回复于 2001-11-29 20:41:44 得分 0
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
if(Shift.Contains(ssLeft))
{
SetCapture(this->Handle);
}
ReleaseCapture();
}Top
3 楼HorkyTao(雨人)回复于 2001-11-29 20:42:40 得分 10
不好意思,上面错了,应该是下面这样!
void __fastcall TFrmQTYK::FormMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
if(Shift.Contains (ssLeft) )
{
ReleaseCapture();
Perform(WM_NCLBUTTONDOWN,HTCAPTION,0);
}
}Top
4 楼gloom(苍狗白云)回复于 2001-11-29 20:43:58 得分 0
同意: HorkyTao(流浪者) Top
5 楼781014(城北的风)回复于 2001-11-29 22:41:22 得分 0
1Top
6 楼81739649(好烦)回复于 2001-11-29 22:43:05 得分 0
SendMessage(handle(this),274,61458,0)Top
7 楼shally5(我在一旁静静的看着你)回复于 2001-11-30 08:28:49 得分 0
void __fastcall TForm1::MessageMemoMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
//拖动窗口
ReleaseCapture();
Perform(WM_SYSCOMMAND,0xf012,0);
}Top
8 楼shally5(我在一旁静静的看着你)回复于 2001-11-30 08:31:10 得分 10
void __fastcall TForm1::FormMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
//拖动窗口
ReleaseCapture();
Perform(WM_SYSCOMMAND,0xf012,0);
}Top




