我是说用 GDI 的 API 绘制表格和文字可以实现韩文显示,如:Private Declare Function DrawText Lib "user32" Alias "DrawTextW" ( _ ByVal hdc As Long, _ ByVal lpStr As String, _ ByVal nCount As Long, _ lpRect As RECT, _ ByVal wFormat As Long) As Long 不过这个控件的API我全用 A 的,呵呵Private Declare Function DrawText Lib "user32" Alias "DrawTextA" ( _ ByVal hdc As Long, _ ByVal lpStr As String, _ ByVal nCount As Long, _ lpRect As RECT, _ ByVal wFormat As Long) As Long
能支持大型数据操作的,所以这个控件也做了点这方面的架构设计与支持,曾经测试过二十万条数据的操作,
感觉还不错,不过在架构上来说其实还有很多地方和方案可以改良,不过作为普通的运用,这样也就够用了。只是感觉初始化的时候慢了一点,因为我初始化的时候分配了三个屏幕大小的GDI设备来处理要交换的图形,
当窗口显示出来后,具体的操作和设置数据的速度都还是很理想很流畅的,就是显示窗口的时候会卡一下。
最郁闷的就是这里,所以后来打算用VC来写,不过因为有没有这方面时间预算,也就懒得弄他了,在VB
下写这东西,当时都花了我两周时间才弄得稍微稳定点,VC下的开发周期更加长,所以就放弃了。如果你觉
得用作商业途径没问题,我是没关系的,呵呵
1,是有小气老板的无法之举
2,图片要有选择,不要的话,提高load的速度。
3,初始化行列,稍稍偏左了,右边的button的间距稍稍不同。command5可以右移点
4,时间下拉的格式不一样。
5,读数据的宽度比别的窄。这都不重要,要紧的是圈舍的意思,养猪的?
那时候先做软件,后面做硬件,搞自动化养殖,自动化信息采集,如发情、背标、体重等,根据RFID自动识别目标,最后做到精确投料。看看网上的视频知道了,其实这一块也挺有意思的。
行 45:不能加载控件 DBGrid2。
行 72:不能加载控件 DBGrid1。
ByVal hdc As Long, _
ByVal lpStr As String, _
ByVal nCount As Long, _
lpRect As RECT, _
ByVal wFormat As Long) As Long
不过这个控件的API我全用 A 的,呵呵Private Declare Function DrawText Lib "user32" Alias "DrawTextA" ( _
ByVal hdc As Long, _
ByVal lpStr As String, _
ByVal nCount As Long, _
lpRect As RECT, _
ByVal wFormat As Long) As Long