Không cho Resize UserControl

[tungcan5diop]

Thủ thuật: Không cho Resize UserControl
Tác giả: Kasper
Mô tả: Không cho Resize UserControl

---

bài viết được chuyển qua từ: http://www.caulacbovb.com/forum/viewtop ... =8&t=10655
có gì các bạn có thể tham khảo thêm qua link đó nha
tạo một cái UserControl rồi sử dụng code sau

Mã: [Chọn hết] [Mở rộng/Thu hẹp] [Tải về]

1. Protected Overrides Sub OnResize(ByVal e As System.EventArgs)
2.         If Me.Width < 100 Or Me.Width > 100 Then Me.Width = 100
3.         If Me.Height < 100 Or Me.Height > 100 Then Me.Height = 100
4.         MyBase.OnResize(e)
5.     End Sub

GeSHi © Codebox Plus

hoặc có thể sử dụng đoạn code sau(code by:1045007)

Mã: [Chọn hết] [Mở rộng/Thu hẹp] [Tải về]

1. Protected Overrides Sub SetBoundsCore(ByVal x As Integer, ByVal y As Integer, ByVal width As Integer, ByVal height As Integer, ByVal specified As System.Windows.Forms.BoundsSpecified)
2.         MyBase.SetBoundsCore(x, y, 100, 100, BoundsSpecified.All)
3.     End Sub

GeSHi © Codebox Plus

tác giả yêu cầu cao hơn một chút là, không cho resize thì không có hình mũi tên 2 chiều khi đưa chuột ra cạnh của control luôn. Giống như cái Textbox single line đó

code như sau:

Mã: [Chọn hết] [Mở rộng/Thu hẹp] [Tải về]

1. Imports System.Windows.Forms
2. Imports System.Windows.Forms.Design
3. Imports System.ComponentModel
4.  
5. <Designer(GetType(MyControlDesigner))> _
6. Public Class FixSizeControl1
7.     Inherits ListBox
8.  
9.     Private _Size As Drawing.Size
10.     Public Overloads Property Size()
11.         Get
12.             Return _Size
13.         End Get
14.         Set(ByVal value)
15.             _Size = New Drawing.Size(100, 100)
16.         End Set
17.     End Property
18. End Class
19.  
20. Friend Class MyControlDesigner
21.     Inherits ControlDesigner
22.     Public Overrides ReadOnly Property SelectionRules() As System.Windows.Forms.Design.SelectionRules
23.         Get
24.             Return SelectionRules.Moveable Or SelectionRules.Visible
25.         End Get
26.     End Property
27. End Class

GeSHi © Codebox Plus

thanks Kasper & 1045007 đã chia sẻ

[khoaakt]

trùi! cái này không cần code mình cũng làm được! chỉ cẩn đổi thuộc tính của usercontrol như thế này
(têncontrol).maximumsize với minimumsize bằng size của control