Danke bei mir funktioniert es jetzt.
Richtig toll dass ihr immer helft
Edit: Sorry, beim decrypten nen kleiner Fehler :
Delphi-Quellcode:
RC4Init(MyContext, ProgramKey);
RC4Code(MyContext, ProgramCode, ProgramOrginalCode, Length(ProgramCode));
RC4Done(MyContext);
Code:
[DCC Fehler] Project1.dpr(23): E2033 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen