方法2 unit Unit1;interfaceuses  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,  System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls;type  TForm1 = class(TForm)    Panel1: TPanel;    procedure FormShow(S…

private    { Private declarations }    procedure WMMOVE(var Msg: TMessage); message WM_MOVE;  procedure TForm1.WMMOVE(var Msg: TMessage);begin    inherited;    if (Left < 30) and (Top < 30) and      (Left <> 0) and (Top <> 0) then // 设定移…

方法一: 1 2015-07-11 16:05:35 Point formPoint;//记录窗体的位置 private void Form1_MouseDown(object sender, MouseEventArgs e) { formPoint = new Point(); int xOffset; int yOffset; if (e.Button == MouseButtons.Left) { xOffset = -e.X; yOffset = -e.Y; formPoint = n…

登陆界面: using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Net; using System.Net.Sockets; using System.Text; using System.Threading.Tasks; using System.W…

winform: //bool formMove = false;//窗体是否移动 //Point formPoint;//记录窗体的位置 private void Login_MouseDown(object sender, MouseEventArgs e) {//formPoint = new Point(); //int xOffset; //int yOffset; //if (e.Button == MouseButtons.Left) //{ // xOffset = -e.X -…