西瓜的夏天

摘要： try idsmtp2.Username := 'abc123@163.com'; //设置登陆帐号 idsmtp2.Password := 'abc123';// 设置登陆密码 idsmtp2.Host:='smtp.163.com';// 设置SMTP地址 if idsmtp2.Connecte 阅读全文

摘要： cxgridviewtest1.SortOrder := soNone; //取消排序 cxgridviewtest1.SortOrder := soAscending; //升序 cxgridviewtest1.SortOrder := soDescending; //降序 阅读全文

摘要： 在函数中如果数组的个数不定，可以使用开放数组参数 实参可以接受静态数组和动态数组 procedure p1(a:array of Byte); begin ShowMessage( IntToHex( Integer(@a),2)); ShowMessage(IntToStr(a[0])); end 阅读全文

摘要： Delphi、C#之父Anders Hejlsberg 近日首次访华，并在10月24日和27日参加了两场见面会，分享了他目前领导开发的TypeScript项目，并与国内前端开发者近距离交流。本文就为读者描述一下近距离接触大师的印象，以及Anders对TypeScript的设计理念和想法。 Ander 阅读全文

摘要： ExpandFileName(Application.ExeName);//返回文件的全路径(含驱动器、路径) D:\delphi程序\20170427\Win32\Debug\MyTestProject.exeExtractFileExt(Application.ExeName); //从文件名中 阅读全文

摘要： Delphi的经典书籍：1、《Delphi 技术手册》 Ray Liscbner著 632页　65元 中国电力出版社2、《Delphi 5 开发人员指南》 Steve Teixeira & Xavier Pacheco著 1263页 138元 机械工业出版社3、《Delphi COM 深入编程》 E 阅读全文

摘要： 可以使用 select into 命令，根据在 select 语句的选择列表中指定的列以及在 where 子句中指定的行来创建新表 例如 select * into app_tr_type_bak from app_tr_type; 阅读全文

摘要： 触发器可自动操作。只要数据发生修改（无论是数据录入人员进行数据录入还是应用程序进行的操作），触发器就会工作。触发器专门用于一种或多种数据修改操作（update、insert 和 delete），并对每个 SQL 语句执行一次. 以下创建一个history_record_bak表的触发器 create 阅读全文

摘要： var hAppMutex: THandle; //声明互斥变量begin hAppMutex := CreateMutex(nil, false,'WMS');// WMS应用程序名称 if ((hAppMutex <> 0) and (GetLastError() = ERROR_ALREADY 阅读全文

摘要： 很多人都知道，Linus在1991年创建了开源的Linux，从此，Linux系统不断发展，已经成为最大的服务器系统软件了。 Linus虽然创建了Linux，但Linux的壮大是靠全世界热心的志愿者参与的，这么多人在世界各地为Linux编写代码，那Linux的代码是如何管理的呢？ 事实是，在2002年 阅读全文