窗体问题--拖动无标题栏的窗体

2016-01-29 13:18 5 1 收藏

窗体问题--拖动无标题栏的窗体,窗体问题--拖动无标题栏的窗体

【 tulaoshi.com - ASP.NET 】


Private mouse_offset As Point Private Sub form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown mouse_offset = New Point(e.X, e.Y) End Sub
Private Sub form1_MouseMove(ByVal Sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove '按住鼠标左右键均可拖动窗体 Dim frm As Form1 = DirectCast(Sender, Form1) If e.Button = MouseButtons.Left Or e.Button = MouseButtons.Right Then Dim mousepos As Point = frm.MousePosition '获得鼠标偏移量 mousePos.Offset(-mouse_offset.X, -mouse_offset.Y) '设置窗体随鼠标一起移动 frm.Location = mousepos End If
End Sub
Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '关闭窗体 Me.Close() End Sub
////////////////////////////////////// 闵峰 2005/05/26

来源:https://www.tulaoshi.com/n/20160129/1489656.html

延伸阅读
  1.添加引用:DBClient 2.置DBGridEh控件属性:   设置dghAutoSortMarking属性为true  设置希望排序的Column的TitleButton属性为true 3.//表格排序过程 procedure OrderGrid(dataSet:TClientDataset;orderField:string); var   i:integer; begin   if dataSet.IndexFieldNames'' then ...
import javax.swing.*; import java.awt.*; import java.awt.event.*; import javax.swing.UIManager; class Mywindow extends JFrame { JButton button1; JButton button2; JInternalFrame interframe1,interframe2; JPanel jpanel; Mywindow() { setVisible(true); //setSize(400,400)见下面的说明! jpanel=(JPanel)this.getContentPane(); ...
如何移动没有Title的窗体。 private void label1_MouseDown(object sender, System.Windows.Forms.MouseEventArgs e) { mouse_offset = new Point(-e.X, -e.Y); } private void label1_MouseMove(object sender, System.Windows.Forms.MouseEventArgs e) { if (e.Button == MouseButtons.Left) { Point mousePos = Control.MousePos...
很多人都在问怎么更改java应用程序标题栏默认图标,如果你用过Toolkit类,这将是一件很简单的事情: Toolkit tk=Toolkit.getDefaultToolkit() Image image=tk.createImage("image.gif"); /*image.gif是你的图标*/ this.setIconImage(image); 就这么简单,看看,已经变成你自己的图标了。Toolkit是个很有用类...
摘要 在你的应用程序中,你可能会希望将应用程序的标题栏进行闪动,以提醒用户进行某种操作,本文介绍了如何使一个窗口的标题栏进行闪动。 闪动标题栏 闪动一个窗口的标题栏意味着改变它的标题栏的外观,例如它从活动变为不活动,或是从不活动变为活动等等。只要你能在VisualBasic中得到窗口的句柄,你就可以使用Windows应用程...

经验教程

996

收藏

78
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部