白 白河愁 Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-11 #21 不加壳的程序对我来说一般都是几分钟到几小时之内可以KO的。
N nicotine Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-12 #22 to creation-zy 写这么个小工具我觉得不会方便多少，而且要写出这个小工具也不是个简单的事情，反而更麻烦。 我的意思也是写一个function ver:String to 白河愁 如果要刻意破解的话，windows xp都可以破解，我只不过不想让一些喜欢改人家署名的小瘪三把关于我的信息改成他的了
to creation-zy 写这么个小工具我觉得不会方便多少，而且要写出这个小工具也不是个简单的事情，反而更麻烦。 我的意思也是写一个function ver:String to 白河愁 如果要刻意破解的话，windows xp都可以破解，我只不过不想让一些喜欢改人家署名的小瘪三把关于我的信息改成他的了
白 白河愁 Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-12 #23 你不明白,windows等大型软件为了效果不会采用VM之类的高强度算法,所以被破解是很自然的.不懂就不要拿 WINDOWS 来说.
我 我爱PASCAL Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-13 #24 const 是支持标准函函数的，那么支持自定义也可能的，你可以试一下
L liyinwei Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-13 #25 正如 我爱PASCAL 兄所说，确实有这种定义 const 常量的方法； 之所以信息能够被修改，原因在于信息被修改过后程序还是可以正常运行， 我的想法是，假如信息被修改后程序根本就无法正常运行，就应该没有人去浪费时间修改了。 以下的例子我没有测试过能不能被修改，哪位高人短时间内修改成功了，请上来说明一下方法。 function VerString: String; var sVer: T1_414; begin sVer := T1_414.Create; Result := sVer.ClassName; sVer.Free; //这里还可以加入代码把 T1_414 转换为 1.414 end; procedure TForm1.FormCreate(Sender: TObject); type TFunction = function: String; const sVer: TFunction = VerString; begin Caption := sVer; end;
正如 我爱PASCAL 兄所说，确实有这种定义 const 常量的方法； 之所以信息能够被修改，原因在于信息被修改过后程序还是可以正常运行， 我的想法是，假如信息被修改后程序根本就无法正常运行，就应该没有人去浪费时间修改了。 以下的例子我没有测试过能不能被修改，哪位高人短时间内修改成功了，请上来说明一下方法。 function VerString: String; var sVer: T1_414; begin sVer := T1_414.Create; Result := sVer.ClassName; sVer.Free; //这里还可以加入代码把 T1_414 转换为 1.414 end; procedure TForm1.FormCreate(Sender: TObject); type TFunction = function: String; const sVer: TFunction = VerString; begin Caption := sVer; end;
N nicotine Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-14 #26 function VerString: String; var sVer: T1_414; begin sVer := T1_414.Create; Result := sVer.ClassName; sVer.Free; //这里还可以加入代码把 T1_414 转换为 1.414 end; --------------------- 狂晕~~用类名~~~这都行！！佩服佩服！兄弟真是点子多，呵呵，谢谢！
function VerString: String; var sVer: T1_414; begin sVer := T1_414.Create; Result := sVer.ClassName; sVer.Free; //这里还可以加入代码把 T1_414 转换为 1.414 end; --------------------- 狂晕~~用类名~~~这都行！！佩服佩服！兄弟真是点子多，呵呵，谢谢！
N nicotine Unregistered / Unconfirmed GUEST, unregistred user! 2007-08-14 #27 来自：白河愁, 时间：2007-8-12 18:37:28, ID：3821990 你不明白,windows等大型软件为了效果不会采用VM之类的高强度算法,所以被破解是很自然的.不懂就不要拿 WINDOWS 来说. 是这样？好吧，现在我的意思就是不用这么复杂，我的软件也就是一小软件，好玩而已。
来自：白河愁, 时间：2007-8-12 18:37:28, ID：3821990 你不明白,windows等大型软件为了效果不会采用VM之类的高强度算法,所以被破解是很自然的.不懂就不要拿 WINDOWS 来说. 是这样？好吧，现在我的意思就是不用这么复杂，我的软件也就是一小软件，好玩而已。
