procedureTForm1.pnl1MouseDown(Sender:TObject;Button:TMouseButton; Shift:TShiftState;X,Y:Integer);begin ReleaseCapture;SendMessage(pnl1.Handle,wm_SysCommand ...
確定! 回上一頁