Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Highlight current record with continousform
#1
Chào mọi người, mình có 1 thủ thuật dùng để tô màu record khi forcus record đó. Nhưng lại bị vấn đề rất khó chịu là mỗi lần click như vậy màn hình form chớp chớp. Ai có thể giúp mình loại bỏ cái chớp khi click vào record. Hoặc có cách khác để ko còn bị chớp nữa thì giúp mình với. 
Link demo
https://www.dropbox.com/s/ydqevsdr94frqqv/db33.zip?dl=0
Chữ ký của mrsiro Xin chào, mình là mrsiro, Tham gia http://thuthuataccess.com/forum từ ngày 05-12 -14.
Reply
Những người đã cảm ơn
#2
Bạn không chia sẻ thì sao giúp được?
Chữ ký của cpucloi Tôi chỉ biết mỗi một điều là những điều tôi biết được còn quá ít 021


ღღღღღTài sản của cpucloi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
link tải demo ở trên đó bạn
Chữ ký của mrsiro Xin chào, mình là mrsiro, Tham gia http://thuthuataccess.com/forum từ ngày 05-12 -14.
Reply
Những người đã cảm ơn
#4
Cái lỗi nhấp nháy này của Access cũng vô chừng lắm, có máy bị có máy không. Đó là do lỗi của Ms Access.
Để giảm nhấp nháy thì bạn dùng cách tạo độ trễ cho việc refresh cái form một chút,
Tôi dùng thử cả 2 cái hàm DoEvents Sleep API thì thấy hàm Sleep hiệu quả hơn.
Và cách highligh dòng thì tôi không dùng Conditional Formating mà dùng code VBA.

Link: http://www.mediafire.com/file/t2heyuadnk...2.mdb/file

Mã PHP:
Option Compare Database
Option Explicit

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Dim curID As Integer

Private Sub Detail_Paint()
   If Me.curID Then
       Me
.Detail.BackColor 16776960
   Else
       Me
.Detail.BackColor RGB(187182174'16777215'
   End If
End Sub

Private Sub Form_Current()
   curID Nz(Me.a0)
   'DoEvents'
   Sleep 50
End Sub 
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#5
Ngoài ra, nó phụ thuộc vào cấu hình máy của bạn, nếu ngon thì tần suất chớp sẽ rất nhanh khiến mình không cảm thấy và ngược lại
Chữ ký của cpucloi Tôi chỉ biết mỗi một điều là những điều tôi biết được còn quá ít 021


ღღღღღTài sản của cpucloi (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#6
(11-08-18, 01:17 AM)ongke0711 Đã viết: Cái lỗi nhấp nháy này của Access cũng vô chừng lắm, có máy bị có máy không. Đó là do lỗi của Ms Access.
Để giảm nhấp nháy thì bạn dùng cách tạo độ trễ cho việc refresh cái form một chút,
Tôi dùng thử cả 2 cái hàm DoEvents Sleep API thì thấy hàm Sleep hiệu quả hơn.
Và cách highligh dòng thì tôi không dùng Conditional Formating mà dùng code VBA.

Link: http://www.mediafire.com/file/t2heyuadnk...2.mdb/file

sao demo này của bạn nó ko còn highlight record nữa vậy bạn.
Ở demo của mình mục đích của me.refresh là để nó hiện highlight record, nếu ko có lệnh này thì ấn vào record nó ko highlight liền. Mình nghĩ nếu có 1 code nào khác có thể thay thế cái me.refresh, nguyên nhân của việc chớp chớp là do cái me.refresh này.
Chữ ký của mrsiro Xin chào, mình là mrsiro, Tham gia http://thuthuataccess.com/forum từ ngày 05-12 -14.
Reply
Những người đã cảm ơn
#7
Highlight xanh chói lói vậy mà bạn nói không à...Bạn xem lại event phần Detail có chưa.

[Hình: 42162375930_72674eefce_c.jpg]
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#8
mở bằng access 2003 ko có tác dụng bạn ơi
Chữ ký của mrsiro Xin chào, mình là mrsiro, Tham gia http://thuthuataccess.com/forum từ ngày 05-12 -14.
Reply
Những người đã cảm ơn
#9
Debug có báo lỗi gì không?
Bạn nào khác có Office 2003 test thử giùm. Code chẳng có gì đặc biệt mà phiên bản Access thấp hơn không có.
Xem lại cái biến CurID, có thể đổi lại thành String theo như Table của bạn thiết lập.

Nếu bạn dùng Win 64 bit thì khai báo lại cái hàm API theo kiểu 64 bit như nhiều bài đã đề cập rồi.

Mã PHP:
#If VBA7 Then
 
   Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr)
#Else
   Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#End If 
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#10
(11-08-18, 01:17 AM)ongke0711 Đã viết:
Cái lỗi nhấp nháy này của Access cũng vô chừng lắm, có máy bị có máy không. Đó là do lỗi của Ms Access.

Để giảm nhấp nháy thì bạn dùng cách tạo độ trễ cho việc refresh cái form một chút,

Tôi dùng thử cả 2 cái hàm DoEvents Sleep API thì thấy hàm Sleep hiệu quả hơn.

Và cách highligh dòng thì tôi không dùng Conditional Formating mà dùng code VBA.



Cái lỗi nhấp nháy này của Access cũng vô chừng lắm, có máy bị có máy không. Đó là do lỗi của Ms Access.

Để giảm nhấp nháy thì bạn dùng cách tạo độ trễ cho việc refresh cái form một chút,

Tôi dùng thử cả 2 cái hàm DoEvents Sleep API thì thấy hàm Sleep hiệu quả hơn.

Và cách highligh dòng thì tôi không dùng Conditional Formating mà dùng code VBA.






Cháu xin hỏi :  Khi chọn record trên thanh cuộn croll bar bên trái thì không có tác dụng highlight cho record mới chọn (trừ khi có  tác động khác trên form như minimize rồi restore thì mới chuyển record highlight. Như vậy khắc phục ra sao ?
Cháu xin cảm ơn.
DooHoaangPhuuc
Chữ ký của DooHoaangPhuuc DooHoaangPhuuc,gia nhập Thủ Thuật Access từ 27-06 -17.
ღღღღღTài sản của DooHoaangPhuuc (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
  Tìm kiếm Record ngay khi gõ trong Combobox - Class ongke0711 5 276 01-08-18, 01:00 PM
Bài mới nhất: ongke0711
  [Hỏi] You cannot add or change a record because a related record is required in table? pvhung76 1 114 18-06-18, 12:12 AM
Bài mới nhất: ongke0711
  [Help] Sub Form tự động điền các record haidc 9 951 05-02-18, 04:36 PM
Bài mới nhất: haidc
  [S.O.S] Điều khiển hiển thị record trên form qua mạng LAN tranthanhan1962 16 1,351 21-01-18, 05:31 PM
Bài mới nhất: tranthanhan1962
  [Help] Chọn nhiều record trong listbox của Form haidc 5 1,284 21-11-17, 06:30 PM
Bài mới nhất: haidc

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ơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line