Form.TopMost = true;
然后在
private void Form1_MouseEnter(object sender, System.EventArgs e)
{
改变Form大小
}
private void Form1_MouseLeave(object sender, System.EventArgs e)
{
改变Form大小
}
然后在
private void Form1_MouseEnter(object sender, System.EventArgs e)
{
改变Form大小
}
private void Form1_MouseLeave(object sender, System.EventArgs e)
{
改变Form大小
}
二楼那样我为太理解,鼠标移动过去改变Form大小??改为0就隐藏???
鼠标移开时,改变Form为正常尺寸??
不知二楼说的是停靠还是隐藏???急切想知道答案
然后在
private void Form1_MouseEnter(object sender, System.EventArgs e)
{
改变Form大小
}
private void Form1_MouseLeave(object sender, System.EventArgs e)
{
改变Form大小
}
private void Form1_Move(object sender, System.EventArgs e)
{
判断form位置,如果y<自己指定的。那么以后就宽度不变,长度缩短,并且y=0
判断form位置,如果x<自己指定的。那么以后就高度不变,宽度缩短,并且x=0
同理其他。
}
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim pt As Point = Me.Cursor.Position Me.TextBox1.Text = Me.Top & ":" & Me.Left
Me.TextBox2.Text = pt.X & ":" & pt.Y
Me.TextBox4.Text = (Me.Left + Me.Width) & ":" & (Me.Top + Me.Height)
If pt.X > Me.Left And (pt.X < Me.Left + Me.Width) and _
pt.Y > Me.Top And (pt.Y < Me.Top + Me.Height) Then
Me.TextBox3.Text = "true"
Me.Visible = True // 这里可以加点动画效果
Else
Me.TextBox3.Text = "false"
Me.Visible = False // 这里可以加点动画效果
End If
End Sub