PDF laden und speichern = kaputtes PDF?

[Neutral General]

Ich weiß nicht ob du ne Klasse hast um PDFs öffnen zu können.. Wenn ja dann geht das damit bestimmt. Wahrscheinlich auch über sowas wie TPDF.SaveToFile.. Wenns nur um das reine speichern geht gibts noch zwei alternativen.. Entweder einfach die Datei kopieren mit

CopyFile oder mit nem (Memory-)Stream öffnen und wieder woandershin speichern.

1. Beispiel

Delphi-Quellcode:

if Opendialog1.Execute then
begin  
  CopyFile(Opendialog1.Filename,'Ort\NeuerDateiname.pdf',false); // true = fehlschlag wenn die datei schon existiert
end;

2. Beispiel

Delphi-Quellcode:

if Opendialog1.Execute then
begin  
  MemoryStream := TMemoryStream.Create;
  MemoryStream.LoadFromFile(Opendialog1.Filename);
  MemoryStream.SaveToFile('NeuerDateiName.pdf');
  MemoryStream.Free;
end;

Gruß
Neutral General