永发信息网

delphi的代码转换为java

答案:2  悬赏:50  手机版
解决时间 2021-02-25 19:41
  • 提问者网友:最爱你的唇
  • 2021-02-25 06:25
const
XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$93,$6D,$84,$47); //字符串加密用

function Enc(Str:String):String;//字符加密函数 这是用的一个异或加密
var
i,j:Integer;
begin
Result:='';
j:=0;
for i:=1 to Length(Str) do
begin
Result:=Result+IntToHex(Byte(Str[i]) xor XorKey[j],2);
j:=(j+1) mod 8;
end;
end;

function Dec(Str:String):String;//字符解密函数
var
i,j:Integer;
begin
Result:='';
j:=0;
for i:=1 to Length(Str) div 2 do
begin
Result:=Result+Char(StrToInt('$'+Copy(Str,i*2-1,2)) xor XorKey[j]);
j:=(j+1) mod 8;
end;
end;
最佳答案
  • 五星知识达人网友:逃夭
  • 2021-02-25 06:32
不能直接转换的,编译器不同,标识符的意义都不同,比如JAVA中的for循环好像是没有DO的,,怎么转换?你先搞清楚DELPHI的代码有什么功能,再弄清JAVA如果实现这种功能,自己再写JAVA代码.
全部回答
  • 1楼网友:孤独入客枕
  • 2021-02-25 07:37
public void parserxml(string filename) {     try {         documentbuilderfactory dbf = documentbuilderfactory.newinstance();         documentbuilder db = dbf.newdocumentbuilder();         document document = db.parse(filename);         nodelist employees = document.getchildnodes();         for (int i = 0; i < employees.getlength(); i++) {             node employee = employees.item(i);             nodelist employeeinfo = employee.getchildnodes();             for (int j = 0; j < employeeinfo.getlength(); j++) {                 node node = employeeinfo.item(j);                 nodelist employeemeta = node.getchildnodes();                 for (int k = 0; k < employeemeta.getlength(); k++) {                     system.out.println(employeemeta.item(k).getnodename()                             + ":" + employeemeta.item(k).gettextcontent());                 }             }         }         system.out.println("解析完毕");     } catch (filenotfoundexception e) {         // 找不到文件         system.out.println(e.getmessage());     } catch (parserconfigurationexception e) {         system.out.println(e.getmessage());     } catch (saxexception e) {         system.out.println(e.getmessage());     } catch (ioexception e) {         system.out.println(e.getmessage());     } }
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯