• 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

Thay thế Context Menu mặc định của TextBox

Các ví dụ nho nhỏ và những thứ linh tinh không thuộc nhóm nào
Hình đại diện của người dùng
tuyen_dt18
Guru
Guru
Bài viết: 259
Ngày tham gia: T.Bảy 19/04/2008 8:46 pm
Đến từ: Hưng Yên
Been thanked: 43 time
Liên hệ:

Thay thế Context Menu mặc định của TextBox

Gửi bàigửi bởi tuyen_dt18 » T.Sáu 19/11/2010 2:44 am

Tên chương trình: Thay thế Context Menu mặc định của TextBox
Ngôn ngữ lập trình: VB6
Tác giả: tuyen_dt18
Chức năng: Thay thế Context Menu mặc định của TextBox


Giới thiệu : Chúng ta thấy khi nhấn chuột phải trên một hộp văn bản (TextBox) sẽ có một Menu xổ ra. Đó chính là Context Menu mặc định của lớp EDIT khi một TextBox được tạo ra.
Khi bắt đầu hiển thị Menu này, hệ thống sẽ gửi thông điệp WM_CONTEXTMENU tới TextBox qua thủ tục Window. Để không hiển thị Menu mặc định này, chúng ta gán giá trị trả về của thủ tục Window của TextBox = một giá trị khác 0 và thoát khỏi thủ tục. Để thay thế một Context Menu khác cho TextBox, chúng ta có thể lấy một Menu từ 1 Form, hoặc tạo một Menu mới. Sau đó việc quan trọng mà chúng ta cần làm là thiết lập trạng thái của từng mục phù hợp với ngữ cảnh (Context) hiện tại của TextBox. Ví dụ như nếu TextBox không có ký tự nào được chọn thì Menu Cut, và Copy sẽ bị Disable, hoặc nếu trong Clipboard không có dữ liệu Text thì mục Paste sẽ bị Disable.
Trong mã nguồn này tôi đã làm tất cả những việc này, các bạn tham khảo !
Mã nguồn :
ContextMenu.rar
Thay thế ContextMenu của TextBox
(3.83 KiB) Đã tải 571 lần


Hỏi ý kiến tác giả trước khi sử dụng hoặc trích dẫn rõ nguồn bài viết khi sử dụng.

Quay về “[VB] Mã nguồn linh tinh”

Đ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