如何判断窗体被拖至屏幕的顶边,或一侧?

解决方案 »

  1.   

    if form1.left=0 then
    if from1.top=0 then
      

  2.   

    试过了好象不行。请问
    if form1.left=0 then
    if from1.top=0 then该在什么事件里添加?太菜了呵呵~~
      

  3.   

    靠左靠上可以直接用left和top,
    右边:if form1.left + form1.width = screen.width then
    下边:不太好算,我没把握,不敢胡说。
      

  4.   

    应该在Form_Resize 事件中添加
      

  5.   

    所有的 WINDOWS 界面都是“画”出来的所以在 form_paint 事件里判断应该是有效的===========================
    Option ExplicitPrivate Sub Form_Paint()
    Me.Caption = CStr(Me.Left) + "  " + CStr(Me.Top)
    End Sub