Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.755 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: AES encryption with Header

  Alt 2. Jul 2009, 16:56
Hi there,
Delphi-Quellcode:
  if Dec(F,F1,H) then
    begin
     f1.position:=0; // new
     // save the decrypted file
     f1.SaveToFile(ChangeFileExt('myfile.enc','.dec'));
    end;
  else
     showMessage('error ind dec')
  F.Free;
  F1.Free;
does dec give a true or false back?

Best regards
Klaus
Klaus
  Mit Zitat antworten Zitat