08 2007 档案

关于TListView中的Data属性
摘要：赋值： type PAllHidenDate = ^AllHidenDate; AllHidenDate = record PriceID: Integer; OrderNumber: string; State: Integer; PriceData: WideString; end; var Hi... 阅读全文
posted @ 2007-08-25 20:49 sonicit 阅读(609) 评论(0) 推荐(0)
解决使用Delphi的Thread时主线程阻塞
摘要：最近在使用Thread时发现，如果在同步代码中有运行比较长的算法时，会把主线程阻塞，使界面无法操作。找了很多资料后来发现，在要在运行比较长的算法中加入Application.ProcessMessages。 Application.ProcessMessages的意思是响应主线程中消息队列里的消息。 阅读全文
posted @ 2007-08-17 13:55 sonicit 阅读(1582) 评论(3) 推荐(0)
在Delphi中使用Action降低水平功能和业务功能的耦合
摘要：权限和日志管理是较为常见的水平功能，而且需求比较灵活，通常硬编码到程序中。本文将对Delphi中的Action进行扩充实现将权限和日志管理功能从主程序中分离。1. 常见的方法是将权限管理和日志管理直接硬编码到过程或者对象的方法中。例如：procedure TForm1.Button1Click(Sender: TObject);begin if isSuperUser(UserName) th... 阅读全文
posted @ 2007-08-02 14:23 sonicit 阅读(630) 评论(0) 推荐(0)
自定义组件中使用枚举类型时需要注意的地方
摘要：在自定义组件中使用枚举类型的属性时，如用枚举类型的默认序列时如： TPotencesType = (PT_View, PT_Modify, PT_Delete, PT_Insert, PT_Auditing, PT_Dispose, PT_Checking ); 可以正常的在设计时来选择其属性，如果用自定义的序列时如： TPotencesTyp... 阅读全文
posted @ 2007-08-02 08:36 sonicit 阅读(428) 评论(0) 推荐(0)