DELPHI不过期了...
Delphi 2010只剩下六天的试用期了,15天的试用期过得真快.百度了很久也依旧未搜索到破解补丁,看来这版本的防盗版工作做得确实不错.无奈之下只好自己对它做做手脚了.
测试了一下,delphi只有在启动程序的时候把时间记录给更新到当前日期,系统内并不驻留相应的监视进程,而且只针对日期而非时刻来判断.这样就很好办了.只要写一个自动修改系统时间的软件,让时间定格于2010-1-29日,这样DELPHI就可以永不过期了...而我也可以放心地下载他的更新补丁包了. 本来想把这程序扔到网上的,不过想想,能写代码的人这几行代码绝不是问题,无谓多此一举了...
呵.不过用盗版终究不是好事,等哪天他把编译器降价到4位数我再购买吧...
相关文档：
Chr 将一个有序数据转换为一个ANSI字符
Ord 将一个有序类型值转换为它的序号
Round 转换一个实型值为四舍五入后的整型值
Trunc 转换一个实型值为小数截断后的整型值
Int 返回浮点数的整数部分
IntToStr 将数值转换为字� ......
Oracle性能优化与Delphi代码
刚学了点oracle方面的知识，感觉以前写代码只凭喜好写，完全没有深究缘由，导致在内行人看来，写的都是垃圾代码，现在就把学到的一些东西写出来，也算是给刚入门的朋友一点帮助吧。
以前，写数据库访问代码，感觉很简单，不就是sql语句嘛，所以什么语句都是这样写：
A：
......
今天心血来潮在自己的电脑上安装了mysql-5.1.41-win32和mysql-connector-odbc-5.1.6-win32。以前，我曾经尝试使用ＤＥＬＰＨＩ６去联接ＭＹＳＱＬ但是在网上找很多资料都不很好用；今天突然也想起这个问题就干起回来了。
１. 建立数据库
use mysql;
drop database myDB;
create database ......
ADO 使用 ORACLE provider FOR OLE DB 驱动时
调用存储过程需要返回游标时，在连接字符串中增加
PLSQLRSet=1 参数。
存储过程中的游标不需要付初始值
如:
sp1: TADOStoredProc;
sp1.Close;
sp1.ProcedureName := 'pkg_ScanList_By_JobNo.sp_GetScanList';& ......
absolute
//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Ed ......
