Unicode Data Grid Version 2.3 Build 15 [29/5/2011]

[DQHung]

Tên: UniDataGrid
Loại: OCX
Ngôn ngữ lập trình: VB6
Tác giả: Dương Quốc Hưng - DQHung
Chức năng: Control dạng lưới có thể sử dụng với nhiều hệ quản trị CSDL (Access, MySQL, SQL Server), Giao diện đẹp, tốc độ Load nhanh. Tất nhiên cũng phải hỗ trợ Unicode

---

- Như chúng ta đã biết, Grid mà một điều khiển không thể thiếu trong các chương trình quản lý, các sử lý có liên quan đến bảng biểu, ... nhưng các OCX Grid mặc định (đã có sẳn) của VB6 hầu như không thể đáp ứng nhu cầu của hầu hết người dùng. Vì vậy nay tôi đã viết ra một điều khiển mới có tên là UniGrid, nó hỗ trợ nhiều hơn, giao diện đẹp hơn hẳn so với các OCX Grid cũ mà VB6 hỗ trợ.

- Version 2.2 :
- Fix : Column bị tăng lên 1 khi Rebind
- Add : AllowAddnew (Cho phép thêm dòng)
- Fix Giao diện.
- Version 2.1 :

1. Fix : Bind Control
2. Add : Có thể kết nối đến MySQL (Điều kiện phải cài đặt Connector).
3. Add : Có thể kết nối đến SQL Server.
4. Add : UTF8Mode (Nếu chế độ này là True thì mọi dữ liệu ra vào của Grid sẽ được Encode dạng UTF8, rất thích hợp cho SQLServer-MySQL khi dùng cho Website).
5. Add : Các Property Color để chỉnh màu sắc cho giao diện.

- Version 2.0 :
1. Hỗ trợ Unicode đầy đủ.
2. Cột có nhiều định dạng (Text, Check, Icon, Progress,...).
3. Kết nối CSDL đến tập mdb (Access) một cách nhanh chóng.
4. Fix nhiều Bug trong phiên bản 1.0.
5. Giao diện mới mẽ.

Build 7.0 :

* Cập nhật thêm 2 giao diện mới : Grid2003, BlackSkin
* Fix tốc độ load item
* Thêm hàm InsertRow(Column1, Column2,....), DeleteRow
* Cho phép chọn nhiều dòng và định chiều cao của mỗi dòng
* Fix và thêm một số property,sub.

Build 15 :
* Cập nhật vài thứ mới về giao diện. Các property. Sửa một số lỗi nhỏ.

Screenshot :

Download :

Version 2.2 (OCX) :

UniDataGrid_v2.2b3.rar

(100.99 KiB) Downloaded 1893 times

Version 1.0 (Source) :

UniDataGird.rar

UniDataGird Source code

(30.12 KiB) Downloaded 1957 times

Version 2.3 Build 15

UniDataGridv2.3b15.rar

(73.35 KiB) Downloaded 1831 times

[vietstu]

Mình đã sử dụng thử thấy nó thiếu một số chức năng như :
1. Không hổ trợ nhiều giao diện như của LynxGrid
2. Không cho phếp sắp xếp ca mẫu tin
3. Khi di chuyển lên Header thì không đổi màu (không đẹp)
4. KHông có các chức năng cho phép/không cho phép sửa, xóa. Cũng như trước khi xóa, sau khi xóa/sửa
(còn nữa nhưng chưa test hết)
PS : Bác có thể chỉnh lại cho thằng LynxGrid cho phép nhập được UNICODE không? (Đây là công cụ rất hay) -> anh em sẽ nhờ rất nhiều từ nó
Cám ơn bác nhiều

[thuongall]

PS : Bác có thể chỉnh lại cho thằng LynxGrid cho phép nhập được UNICODE không? (Đây là công cụ rất hay) -> anh em sẽ nhờ rất nhiều từ nó

Hôm nay, trong lúc trả lời bài viết thì đọc lại thấy câu này của vietstu, thấy cái phần mềm quản lý điểm của vietstu hình như gõ được Unicode trực tiếp trên Grid, tưởng đâu cái Gride này đã gõ được rồi. Để chỉnh code cho gõ được Unicode rất đơn giản, chỉ cần thay thế cái TextBox chuẩn của VB bằng cái UniTextBox là OK thôi.

[linh_trinh2002]

Chào bạn Hưng,
Mình đang cần gấp cái UniDBGrid của bạn
Mình thử sử dụng như các thuộc tính Datasource không thấy đâu ? (Mình định dùng chung với Data control).
Các thuộc tính DB, RS, Datbase của bạn mình chưa hiểu.
Mong bạn giúp vì mình cần gấp cho software đang làm.
Liên lạc với mình: 0903096868- Linh, Hoặc Bạn cho xin số dt để mình liên lạc & học hỏi
Thân

[DQHung]

Database là đường dẫn của database. RS là Recordset, DB là database đó.
Mọi cái trong source có hết rồi mà ? Cái này cũng đâu phức tạp gì lắm, bạn cứ ngâm cỡ 1,2h là ra thôi mà.

[mrcoding]

Làm cái datasource làm gì. các bác là dân lập trình mà. muốn kết nối thì viết cái code nhỏ là ok rồi việc gì phải bắt người ta làm thêm cái thuộc tính đó cho nặng control. có thêm thì thêm cái chức năng như của excel ấy. có thể enter để nhập liệu.sau đó enter để thoát. rồi di chuyển con trỏ bằng mũi tên.em thấy chỗ đó cần thiết. nếu có thể thì thêm cái bind control nữa !

[DQHung]

Bản fix này có thể di chuyễn qua lại giữa các cell bằng các phím mũi tên.
Bấm Space để nhập liệu, nhập xong bấm Enter. Nói chung là fix tương đối nhiều, các bác test giùm nhé.

[mrcoding]

Hi bác DQHung. theo em nên dùng nút enter cho cả hai bác ạ. chứ lâu giờ đa số mọi người dùng họ dùng enter quen rồi với lại nếu bấm space 2 lần nó sẽ xoá mất chữ. Chỗ bind control không thể sử dụng space hay enter được kích hoạt được. Cái ni mình bổ sung thêm phần sắp sếp nữa không bác ?

[DQHung]

Mình đã làm xong phần "dùng enter" để edit các cell.
Đã Fix Bind Control, Sort và cập nhật vài cái mới. Bạn xem phần cập nhật phía trên nhé.

[thinh18tt]

Chào Hưng;
Mình dùng ver 2.1 thấy hiện tượng như sau:
- Load database lên UniGrid
- Tại sự kiện CellClick mình thực hiện việc load các Recordset lên các textbox thì thấy có 2 vấn đề:
+ Giả sử mình có 10 row, khi click vào row 1 thì toàn bộ dữ liệu được load lên các textbox, click vào row 2 rồi lần lượt các row khác thì không thấy có sự thay đổi nào ở textbox, nhưng nếu click các row xa nhau thì lúc được lúc ko.
+ Còn nữa, với các Grid khác thì mình thấy nếu một số cell rỗng thì nó vẫn load các cell khác lên textbox mà không báo lỗi, của bạn thì báo lỗi và dừng chương trình ngay. Có cách nào dùng được không? Hoặc là phải dùng on error resume next
- Mong bạn xem lại và khắc phục.

Xin lỗi Hưng, mình xem project mẫu của Hưng và làm được rồi, phải dùng sự kiện SelectedRowChange mới đúng.

[thinh18tt]

Chào Hưng;

UniGrid bị hiện tượng sau:
Khi mới tải dữ liệu lên thì ColumnIndex bắt đầu bằng 0
Rồi mình load lại dữ liệu thì bị tịnh tiến lên 1
Bạn kiểm tra xem nhé, mình có gửi kèm ví dụ minh họa.

[DQHung]

Mình đã fix xong lỗi mà bạn gửi. Bạn tải về test thử nhé.

[thinh18tt]

Hi Hưng;
Cảm ơn Hưng nhiều lắm. Mình test OK rồi.

[thinh18tt]

Chào Hưng!
Mình muốn UniGrid của bạn có thêm tính năng như sau, nếu được thì Hưng cho vào nhé!

Gán màu cho các dòng, ví dụ:
Khi load dữ liệu ra UniGrid, nếu giá trị ở cột ngày < ngày hiện tại thì set dòng đó có màu Xanh; = ngày hiện tại thì màu Vàng; > ngày hiện tại thì màu đỏ.

Rất mong Hưng để ý.

[DQHung]

Cám ơn bạn đã góp ý. Mình sẽ xem lại các ý kiến của bạn, cái nào thêm được thì mình sẽ thêm ngay. Hiện tại, mình đã có phiên bản 2.3 nhưng do đang trong thời gian thử nghiệm (vì đang làm chương trình với nó). Có lẽ cuối tháng này sẽ xong và mình sẽ up lên đây cho các bạn dùng.

[NguyenVanMan]

BẠN HÙNG XEM DÙM LỖI NÀY NHA!

Private Sub Form_Load()
With UniGrid
'TAO COLUMNS CHO UNIGRID
.Columns.Add "Field1", "F1", 135, aCenter
.Columns.Add "Field2", "F2", 135, aCenter
.Columns.InsertRow "Test1", "Test1"
.Columns.InsertRow "Test2", "Test2"
.CurrentRow = 0
End With
End Sub


Private Sub UniGrid_SelectedRowChange(RowIndex As Long)
With UniGrid1
.Columns.Clear

.Columns.Add "Field1", "F1", 135, aCenter
.Columns.Add "Field2", "F2", 135, aCenter
If UniGrid.Columns(0).CellValue(RowIndex) = "Test1" Then
.Columns.InsertRow "F1", "Test1"
.Columns.InsertRow "F1", "Test2"
Else
.Columns.InsertRow "F2", "Test1"
.Columns.InsertRow "F2", "Test2"
End If
.CurrentRow = 0
End With
End Sub



KHI CLICK VÀO UniGrid thì UniGrid1 load record theo điều kiện, nhưng UniGrid1 load thừa các dòng trắng trên mẫu tin, bạn Hùng hướng dẫn mình cách khắc phục nha! mình có gửi kèm theo file (Dung UniDataGrid2.3)

[DQHung]

Mình đã fix lại, và upload lên bài đầu, bạn tải về test nhé.

[thinh18tt]

Hi Hưng, mình update lên bản mới nhất Hưng gửi nhưng vẫn bị load thêm 1 dòng trắng ở cuối (nếu nhiều record) và 1 dòng trắng ở trên 1 dòng ở dưới nếu chỉ có 1 reocord. Bạn xem lại nhé!

[DQHung]

Bạn có thể post 1 cái project bị lỗi như bạn nói lên đây ko ?
Nói như vậy mình ko biết đường mà sửa.

[thinh18tt]

Mình gửi Hưng nè!
Hưng xem và fix, nếu có thể nhé!