谁帮我弄下加密.BIN文件 ( 积分: 59 )

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-22

• #1

我QQ78687585
帮下忙啊
不好意思没分了

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-22

• #2

var
ff: TMemoryStream;
i: Integer;
Buf: PByteArray;
begin
ff:= TMemoryStream.Create;
ff.LoadFromFile('c:/1.bin');
Buf:= ff.Memory;
for i:= 0 to ff.Size - 1 do
Buf:= Buf xor $45;
ff.SaveToFile('c:/.bin');
ff.Free;
end;

$45可换。 重复操作解密。

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-22

• #3

你QQ号多少能+你吗？

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-22

• #4

就这么简单了，还有疑问？

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-22

• #5

我的加密是改别人的C代码，我都不知道怎么改

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-23

• #6

那就弄到 c++ builder 上编译下生成 obj delphi调用就是了。

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #7

Myfilestream:=TFileStream.Create(OpenDialog1.FileName,fmOpenRead);
Myjimifilesteam:=TFileStream.Create(OpenDialog2.FileName,fmOpenRead);
Mymemorystream:=TMemoryStream.Create;
Myfilestream.Read(arrbyte,arrLen);
Mymemorystream.Write(arrbyte,arrLen);
Myfilestream.Free;
iTemp:=Myjimifilesteam.Read(Buf,4);
加密过程
Mymemorystream.Write(buf,4);
Mymemorystream.SaveToFile(OpenDialog1.FileName);、
到最后总是暴错
怎么办

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #8

代码乱七八糟，看不懂。

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #9

日

 

J

jialiguo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-10-25

• #10

接受答案了.