Hola de nuevo.
Y si lo deseas hacer desde Delphi:
Código Delphi
[-]
...
uses Registry;
procedure SetPDFCAutoSavePath(NewPath: string);
begin
with TRegistry.Create do
try
NewPath := IncludeTrailingPathDelimiter(NewPath);
RootKey := HKEY_CURRENT_USER;
if OpenKey('\Software\PDFCreator\Program', True) then
begin
if ReadString('AutosaveDirectory') <> NewPath then
WriteString('AutosaveDirectory', NewPath);
CloseKey;
end;
finally
Free;
end;
end;
Ejemplo de uso:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
SetPDFCAutoSavePath(Edit1.Text);
end;
Saludos