创建一个可调整大小和拖拽的Edit

牛牛最美兦

牛牛最美兦

2016-02-19 16:35

今天图老师小编给大家精心推荐个创建一个可调整大小和拖拽的Edit教程,一起来看看过程究竟如何进行吧!喜欢还请点个赞哦~

  创建一个可调整大小和拖拽的Edit

  

//---------------------------------------------------------------------------

  __fastcall TForm1::TForm1(TComponent* Owner)

  : TForm(Owner)

  {

  //修改此单字符串窗口组件性质,可自由缩放大小

  DWORD dwStyle = ::GetWindowLong(Edit1-Handle, GWL_STYLE);

  ::SetWindowLong(Edit1-Handle, GWL_STYLE, dwStyle | WS_SIZEBOX);

  //修正此单字符串窗口组件在Form1上的实际尺寸与范围

  //以便USER直接调整单字符串窗口组件边沿

  ::MoveWindow(Edit1-Handle, Edit1-Left, Edit1-Top,

  Edit1-Width, Edit1-Height + 1, true);

  }

  //---------------------------------------------------------------------------

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

  //当鼠标保持箭头图标时,Edit1即可被拖曳

  void __fastcall TForm1::Edit1MouseDown(TObject *Sender,

  TMouseButton Button, TShiftState Shift, int X, int Y)

  {

  if(Edit1-Cursor == crArrow )

  {

  //释放原有鼠标捕捉状态,

  //并同时送出鼠标单击位置等同于窗口标题栏可拖曳窗口的属性

  ::ReleaseCapture();

  SNDMSG(Edit1-Handle, WM_NCLBUTTONDOWN, HTCAPTION, 0);

  }

  }

  //---------------------------------------------------------------------------

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

  void __fastcall TForm1::Edit1MouseMove(TObject *Sender, TShiftState Shift,

  int X, int Y)

  {

  //鼠标在Edit1上移动时,仍保持箭头图标

(本文来源于图老师网站,更多请访问http://m.tulaoshi.com/bianchengyuyan/)

  Edit1-Cursor = crArrow;

  }

  //--------------------------------------------------------------------------- 

展开更多 50%)
分享

猜你喜欢

创建一个可调整大小和拖拽的Edit

编程语言 网络编程
创建一个可调整大小和拖拽的Edit

孕妇血压低 改变睡姿可调整

电脑网络
孕妇血压低 改变睡姿可调整

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

太极拳可调整脏腑功能的失调

太极拳 养生 健康
太极拳可调整脏腑功能的失调

减少吐奶次数可调整喂养方式

吐奶
减少吐奶次数可调整喂养方式

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

胎儿臀位能顺产吗?胎儿臀位可调整

分娩
胎儿臀位能顺产吗?胎儿臀位可调整

偶写的第一个控件,一个用选择代替输入的Edit控件

编程语言 网络编程
偶写的第一个控件,一个用选择代替输入的Edit控件

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Win8动态磁贴个人信息清除方法汇总

Win8动态磁贴个人信息清除方法汇总

C++ Builder中保持控件的位置及大小

C++ Builder中保持控件的位置及大小
下拉加载更多内容 ↓