最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
限定窗口大小范围--windows message subclassing
时间：2022-07-02 11:40:21 编辑：袖梨 来源：一聚教程网
Imports System.Windows.Forms
Imports System.ComponentModel
Namespace vbCity
Namespace FormClasses
Public Class frmRestricted
Inherits Form
'#Region " Iridium form properties code "
Private mFormMinSize, mFormMaxSize As PointAPI
"The Minimum height that the form can be sized to.")> _
Public Property FormMinHeight() As Int32
Get
' SCS - A return of zero indicates that it has not been
' set.
Return mFormMinSize.y
End Get
Set(ByVal Value As Int32)
CheckBounds(Value, False)
mFormMinSize.y = Value
End Set
End Property ' FormMinHeight
Imports System.ComponentModel
Namespace vbCity
Namespace FormClasses
Public Class frmRestricted
Inherits Form
'#Region " Iridium form properties code "
Private mFormMinSize, mFormMaxSize As PointAPI
"The Minimum height that the form can be sized to.")> _
Public Property FormMinHeight() As Int32
Get
' SCS - A return of zero indicates that it has not been
' set.
Return mFormMinSize.y
End Get
Set(ByVal Value As Int32)
CheckBounds(Value, False)
mFormMinSize.y = Value
End Set
End Property ' FormMinHeight