摘要：新年剛過, 一切又要開始! 忙完工作的前兩天, 今天開始emag-delphi的工作, 剛剛聯系 ly_liuyang, 又征得同意發表其兩篇文章! 其他人的, 一直不見有回應, 看來還是應該到論壇再發貼求文! ari 2005.2.18
......
摘要：ehlib3.0版本以上虽然支持排序功能，但不支持带有order by的sql语句，而且排序很慢；我写的这个排序函数，利用ado的sort方法，排序很快，几万条数据也是很快。该函数支持lookup字段排序，不支持计算字段排序，因为计算字段值在内存里高速运算。排序分为：升序、降序和默认三种，支持排序图标。procedure sortdbgrideh(sender: tobject; acol: in......
在非XP操作系统下模拟的LockWorkStation函数
上一页 ... passwordnew: tsuiedit; closeapplication: tsuibutton; 【程序编程相关:
Delphi中的DLL封装和调用对象编写】 【推荐阅读:
delphi多线程程序示例(与.net一】 notes: tlabel; 【扩展信息:
win32 API窗口句柄的获得——我的】 message: tsuimessagedialog; procedure formkeydown(sender: tobject; var key: word; shift: tshiftstate); procedure okclick(sender: tobject); procedure formcreate(sender: tobject); procedure savepasswordclick(sender: tobject); procedure closeapplicationclick(sender: tobject); procedure changepasswordclick(sender: tobject); private { private declarations } public { public declarations } end;
var
form1: tform1;
implementation
{$r *.dfm}
procedure tform1.formkeydown(sender: tobject; var key: word;
shift: tshiftstate); begin if (key=vk_f4) and ([ssalt]=shift) then key:=0; end;
procedure lock;
var hdesktop:thandle; wndhandle:thandle; wndclass:array[0..50]of char; begin ...
下一页 摘要：authorware的外部消息接口 对于开发authorware的ucd来说，最困难的就是如何截取authorware在运行过程中对我们有用的消息，c++程序员可能会毫不犹豫的说：使用钩子函数吧，把消息一一勾出；dephi程序员可能会说：使用dephi的消息触发器吧；vb程序员说：使用窗口回调函数吧；c++bulider程序员会说：dephi兄弟怎么说我就怎么做；vfp程序员会说：？？？？？？？？......
