Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Thay đổi biểu tượng mũi tên của con trỏ chuột bằng biểu tượng khác
#1
Mình đang cần thay đổi biểu tượng mũi tên của trỏ chuột thành một biểu tượng khác khi trỏ chuột được di chuyển lên form mình muốn (chỉ khi di chuyển lên form mình muốn mới thay đổi, giồng như khi chơi game vậy). Mọi người có cách nào không vậy?
Chữ ký của trunghieu <<---Trên bước đường thành công, không có dấu chân của kẻ lười biếng --->>
ღღღღღTài sản của trunghieu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#2
Mình có một bài hướng dẫn về cái này (sưu tầm), đưa lên đây bạn tự ngâm cứu nhé:

CursorHack (Click to View)
Chữ ký của MTNQ Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn trunghieu , Noname
#3
(25-02-14, 02:31 AM)MatTroiNguQuen Đã viết: Mình có một bài hướng dẫn về cái này (sưu tầm), đưa lên đây bạn tự ngâm cứu nhé:

CursorHack (Click to View)

Mình đã tham khảo bài này ròi nhưng vẫn chưa thể thay đổi được biểu tượng khác theo ý mình, chỉ thay đổi theo một số kiểu có sẵn của máy thôi.

Bạn Cafe Via He đã có một bài viết hướng dẫn trên diễn đàn nhưng hiện tại đường dẫn bị hỏng không thể download được.
Chữ ký của trunghieu <<---Trên bước đường thành công, không có dấu chân của kẻ lười biếng --->>
ღღღღღTài sản của trunghieu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
(25-02-14, 12:12 PM)trunghieu Đã viết: Mình đã tham khảo bài này ròi nhưng vẫn chưa thể thay đổi được biểu tượng khác theo ý mình, chỉ thay đổi theo một số kiểu có sẵn của máy thôi.

Được mà bạn, chắc bạn chưa "ngâm" đủ lâu nên nó chưa ra thui 014

Đọc kỹ đoạn có tô màu nhé
Function ChangeCursor(strPathToCursor As String)

On Error GoTo Error_On_ChangeCursor

' Example :
' ChangeCursor ("C:\Program Files\Microsoft Office\Office\Hand.cur")

If Dir(strPathToCursor) <> "" Then
Dim lngRet As Long
lngRet = LoadCursorFromFile(strPathToCursor)
lngRet = SetCursor(lngRet)
End If

Exit_ChangeCursor:

Exit Function

Error_On_ChangeCursor:

Resume Exit_ChangeCursor

End Function

P/s: Bây giờ mình đang bận, nếu có thời gian mình sẽ làm một VD gởi lên đây 015
Chữ ký của MTNQ Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn trunghieu
#5
Cám ơn bạn mặt trời ngủ quên mình đã làm được rồi!
Chữ ký của trunghieu <<---Trên bước đường thành công, không có dấu chân của kẻ lười biếng --->>
ღღღღღTài sản của trunghieu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Drag chuột Hiển thị thông tin thanhhau828 1 97 10-01-18, 04:38 PM
Bài mới nhất: ongke0711
  Giới hạn chuột di chuyển trên form cpucloi 2 166 26-12-17, 12:26 PM
Bài mới nhất: tranthanhan1962
  Làm sao để Form nhập dữ liệu cho bảng mở ra, luôn ở dòng hiện hành (mới)? pvhung76 3 242 16-11-17, 11:14 PM
Bài mới nhất: ongke0711
  hàm Dlookup không hoạt động ở máy khác thanhtruong 15 1,015 22-10-17, 04:56 PM
Bài mới nhất: khải nguyên
  [Hỏi] Tạo các Button trên FORM với với số lượng button thay đổi theo dữ Liệu minhtungph 4 363 19-10-17, 08:43 AM
Bài mới nhất: minhtungph

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ