• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Không cho Resize UserControl

Các thủ thuật liên quan đến ứng dụng, biểu mẫu và control

Điều hành viên: tungcan5diop, QUANITGROBEST

Hình đại diện của người dùng
tungcan5diop
Cựu chiến binh
Cựu chiến binh
Bài viết: 1123
Ngày tham gia: T.Tư 24/09/2008 4:04 pm
Đến từ: TPHCM
Has thanked: 1 time
Been thanked: 28 time

Không cho Resize UserControl

Gửi bàigửi bởi tungcan5diop » T.Ba 12/01/2010 10:58 am

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
  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

hoặc có thể sử dụng đoạn code sau(code by:1045007)
  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

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:
  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

thanks Kasper & 1045007 đã chia sẻ :)


Hỡi thế gian bug(lỗi) là gì?
Mà sửa...hoài không hết!

Hình đại diện của người dùng
khoaakt
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 75
Ngày tham gia: T.Ba 19/06/2012 6:30 pm
Đến từ: http://việtnam.vn/Kontum/Trường/THPT Chuyên Nguyễn Tất Thành.htm
Has thanked: 8 time
Been thanked: 7 time
Liên hệ:

Re: Không cho Resize UserControl

Gửi bàigửi bởi khoaakt » CN 16/06/2013 10:24 pm

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
:D


Quay về “[.NET] Ứng dụng - Form và Control”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.1 khách