rtf -> pdf?

[Die Muhkuh]

N'Abend :hi:


wie kann ich den aus einer rtf eine pdf machen? Ich hab eine rtf die ich in Delphi in eine pdf umwandeln will! Aber wie geht das? Gibt's da bestimmte kompos für?

[Mikko]

Mit Rave kannst du die Datei als PDF-File speichern.
Ansonsten ist mir noch keine reine PDF-Kompo über den Weg gelaufen.

[Die Muhkuh]

Was issen Rave?

Hab D5Pro

[r_kerber]

Ist der Report-Generator, der ab D7 dabei ist!

[Die Muhkuh]

Aha,

ich hab aber kein D7. Wie kann ich es denn sonst machen?

[r_kerber]

Zitat:

Zitat von Spider

Vorbesteller von Delphi8 Professional incl. Delphi7 Professional!

Etwas warten!

[Die Muhkuh]

aber solange kann ich net warten...
Ich brauch das übers WO

[r_kerber]

Muss es unbedingt mit Delphi sein?

[Luckie]

Versuch mal das ActiveX Kontroll von Acrobate reader einzubinden. nachteil ist allerdings der, dass der Reader installiert sein muss. Ansonsten könntest du es mal bei Torry probieren.

[r_kerber]

Hallo Luckie,

damit kannst Du aber nur PDF lesen aber keine PDF erzeugen!

[eddy]

Hallo Spider,

dann solltest Du aber zusehen, daß Du die Schülerversion bekommst:

EDU DELPHI 8 PRO D - EDU Delphi 8 Professional
1-User Einzellizenz LIZ (ca. 90,00 Euro zzgl. MwSt.)

weil

Delphi 8 Pro D - Delphi 8 Professional (ca. 920,00 Euro zzgl. MwSt.)

doch um einiges teurer ist.

mfg
eddy

[Luckie]

Über die Preise gibt es schon genug Threads in der DP. Also bitte beim Thema bleiben. Danke.

[Die Muhkuh]

@Eddy


Man Vater holts ja! Aber als Upgrade.


@Luckie

Wie soll das gehen?


@r_kerber


Ja es muss mit Delphi sein. Es wäre nicht schlecht wenn ich das übers Wochende das fertig bekomm.

[r_kerber]

Also ich kenne keine Komponente, die rtf ind pdf umwandelt. Es gibt Komponenten, mit denen Du wie ein Report bzw. Druckausgabe arbeiten kannst. Die sind aber IMHO nicht kostenlos. Hast Du schon mal bei DSP oder Torry gesucht?

[Luckie]

Stimmt. Mit dem ActiveX Kontroll wird das wohl nichts. Ichhatte irgend wie im Hinterkopf, dass es ums Drucken ging. :roll:

[Die Muhkuh]

Jo hab schon bei Torry geguckt. Aber nix...

[Christian Seehase]

Moin Zusammen,

das einzige, was ich an kostenloser Möglichkeit kenne ist Open Office 1.1 (www.openoffice.org). Damit müsste man dann eine RTF laden und als PDF ausgeben können.
Um jetzt den Dreh zurück zu Delphi zu bekommen:
OO lässt sich wie MS Office auch über die COM Objekte steuern, allerdings hab' ich jetzt keine Doku zur Hand wie.

[Karsten]

Hallo,

Du kannst Dir ja auch mal 'ne Komponente zu Weihnachten wünschen. Ich habe schon selber nach PDF Komponenten gesucht, kosten aber alle was.

Alternativ nutze ich freePDF als extra Tool und generiere aus Delphi nur *.prn Dateien die ich dann nach PDF konvertieren lasse (von freePDF),

How to create PDF file with Delphi: "Hello, PDF!" example

Gruß,
Karsten

[Jelly]

Hi,

ich habs so gemacht. Den Freeware CutePDF Printer installiert. Damit kannst von jeder Anwendung heruas PDF Dateien erstellen. Im konkreten Fall von RTF->PDF kannst du ja über OLE die RTF Datei mit Word öffnen und von da aus die PDF erstellen.

Übrigens, wenn du Openoffice drauf hast, brauchst du keinen PDF Printer zu installieren. Das Ding kann gleich die PDF erstellen. Ich hab aber keine Ahnung, ob du das mit Delphi über OLE oder sonstwie steuern kannst.

Gruß,
Tom

[Mikko]

Hab jetzt doch 'ne Freeware-kompo gefunden: Suche mal bei Torry nach 'FreeReport'. Wenn du diesen Report benutzt, gibts ein Zusatz-Plug-In, welches PDFs auslesen kann.

[jziersch]

Von der WPCubed GmbH gibt es das RTF tool "WPTools" und den PDF Generator "wPDF". Beide arbeiten hand in hand und sind auch nicht sehr teuer im aktuellen bundle special: EURO 398,- + MwST.
wPDF unterstützt auch metafiles, RAVE, RB, QR, FR etc. WPTools ist eine vollwertige Textverarbeitungs Komponente.

Julian Ziersch
WPCubed GmbH
http://www.wptools.de

[alcaeus]

Ich habs zwar noch nie probiert, aber wenn ein PDF-Drucker installiert ist, müsste es einfach sein:

RTF in eine RichEdit-Kompo laden
Inhalt der RichEdit auf den PDF-Drucker ausgeben
Fertig ist das PDF

Ich weiß aber nicht ob man es so überhaupt lösen könnte, aber einen Versuch wäre es wert

[Ultimator]

Ich nehm immer OpenOffice 1.1. Da is ne sehr komfortable Funktion dafür eingebaut.
Sieht genauso aus wie mit dem Acrobat.

[Phoenix]

Hast Du denn den Com-Wrapper komplett?

Also ich hab noch massiv Probleme, den PDF-Writer von OpenOffice via Delphi anzusteuern :?

[Ultimator]

Ich verwende ihn ja auch nicht in Delphi. Ich öffne meine Dokumente in OpenOffice direkt und tu sie dann umwandeln.

[The-X]

bei SourceForge.net gibt's nen PDF-Druckertreiber mit Source allerdings in VisualBasic :roll:

PDFCreator Freeware :)

[Phoenix]

Zitat:

Zitat von Ultimator

Ich verwende ihn ja auch nicht in Delphi. Ich öffne meine Dokumente in OpenOffice direkt und tu sie dann umwandeln.

Hrm. Die Frage war aber, ob sich das mit Delphi lösen lässt.

[EB19]

Ich habe bei Google Units und DLLs zur Konvertierung von RTF zu PDF gefunden, aber diese haben mich alle zur Verzweiflung gebracht. Was aber gut funktioniert, ist ein download mit Installation des „7-PDF-Makers“.
https://www.7-pdf.de/produkte/pdf-ma...-fuer-experten

Du musst den „7-PDF-Maker“ mit allen Optionen installieren. Dann findest du im Ordner „C:\Program Files (x86)\7-PDF\7-PDF Maker“ das Programm 7p.exe, was eine Batch-Anwendung bzw. für die Eingabeaufforderung ist. Die Dokumentation ist hier:

https://www.7-pdf.de/produkte/pdf-ma...-fuer-experten

In Delphi wird 7p.exe als Hintergrundprozess aufgerufen:
ShellExecute(handle, 'open', Pchar(‘ 7p.exe’), Pchar(‘RTFdatei.rtf’), nil,SW_HIDE);

Dieser Aufruf wandelt die RTF-Datei in eine PDF-Datei gleichen Namens um. Die Argumente von Pchar müssen beiden den vollständigen Datei-Pfad mit beinhalten.

Diese RTF-PDF-Umwandlung funktioniert zuverlässig. Jedoch dürfen keine Leerzeichen im vollständigen Pfad zu RTF-Datei vorkommen. Ansonsten muss der gesamte String in Apostrophe übergeben werden.

[himitsu]

Das ist jetzt hoffentlich nicht nur eine Werbung um den 7PDF-Maker zu verkaufen?



Im Windows ist seit langem ein PDF-Drucker "Microsoft Print to PDF" enthalten,
den einfach als Ausgabe für z.B. TRichEdit verwenden.

Delphi-Quellcode:

uses
  IOUtils, Printers;

procedure TForm1.Button1Click(Sender: TObject);
var
  DeviceMode: THandle;
  Device, Driver, Port: array[0..80] of Char;
begin
  Printer.PrinterIndex := Printer.Printers.IndexOf('Microsoft Print to PDF');
  Printer.GetPrinter(Device, Driver, Port, DeviceMode);
  Printer.SetPrinter(Device, Driver, PChar(TPath.GetTempPath + 'Test.pdf'), 0);

  //Printer.BeginDoc;
  //Printer.Canvas.TextOut(100, 100, 'Test');
  //Printer.EndDoc;
  RichEdit1.Print('Testdruck');
end;

Quelle: https://stackoverflow.com/questions/...-pdf-in-delphi

[Redeemer]

Was? RichEdit.Print druckt auf Printer.PrinterIndex? Ich dachte, das kann nur auf Standarddrucker drucken. Seit wann? Schon immer?

[himitsu]

Auf die Printerinstanz, welche grade aktiv ist.
* nach dem Start der DefaultPrinter
* oder manuell gewählt
* oder nach dem PrinterAuswahlDialog
* oder ...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Self.Print;

  RichEdit1.Print('');
end;

Delphi-Quellcode:

procedure TCustomForm.Print;
begin
  Printer.BeginDoc;
  ...
      with Printer, Canvas do
          ...
          StretchDIBits(Canvas.Handle, 0, 0, PrintWidth, PrintHeight, 0, 0, ...

Delphi-Quellcode:

procedure TCustomRichEdit.Print(const Caption: string);
begin
  Printer.Title := Caption;
  Printer.BeginDoc;
  ...
      LastChar := RenderRange(Printer.Canvas, nil, LastChar, MaxLen);