habe eine Verständnisfrage zu TProcess...
Code: Alles auswählen
uses
..., process;
procedure TForm1.Button1Click(Sender: TObject);
var
AProcess: TProcess;
begin
AProcess := TProcess.Create(nil);
AProcess.Executable:= 'openssl';
AProcess.Parameters.Add(' enc -aes-256-cbc -md sha512 -pbkdf2 -iter 100000 -salt -k dummypasswort' +
' -in /home/swirl/Schreibtisch/Encrypt/Text -out /home/swirl/Schreibtisch/Encrypt/Text.enc');
AProcess.Options := AProcess.Options + [poWaitOnExit];
AProcess.Execute;
AProcess.Free;
end;
erzeugt das Kommando die Text.enc. Bei oben genanntem Code funktioniert es nicht.
Hat jemand eine Idee?
LG,
Michael