几年没用delphi都忘差不多了,以下这段简单的取序列号的java代码,哪位能帮我用delphi翻译出来,多谢了! public class Licence {
public static long getSerialNum(String str) {
if (str == null) {
return 0;
}
byte[] bt = str.getBytes();
int leng = bt.length;
long sn = 0;
for (int i = 0; i < leng; i++) {
sn += bt[i] * getPowerNum(leng - i - 1);
}
return sn;
} public static long getPowerNum(int n) {
long num = 1;
for (int i = 0; i < n; i++) {
num *= 8.62;
}
return num;
} public static void main (String[] args) {
String school="school";//args[0];
String mac="00-E0-4C-50-00-50";//args[1];
String sn=String.valueOf(getSerialNum(school+mac));
System.out.println (sn);
}
}
public static long getSerialNum(String str) {
if (str == null) {
return 0;
}
byte[] bt = str.getBytes();
int leng = bt.length;
long sn = 0;
for (int i = 0; i < leng; i++) {
sn += bt[i] * getPowerNum(leng - i - 1);
}
return sn;
} public static long getPowerNum(int n) {
long num = 1;
for (int i = 0; i < n; i++) {
num *= 8.62;
}
return num;
} public static void main (String[] args) {
String school="school";//args[0];
String mac="00-E0-4C-50-00-50";//args[1];
String sn=String.valueOf(getSerialNum(school+mac));
System.out.println (sn);
}
}
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货