DELPHI AREA Forum

I need print invoice on my application. I'd like use your TPrintPreview to do it. However I should like add templete for invoice so I'd like know if it is possible with your TPrinrPreview.

I need save inside the PPV file the information (posizione and name) about the "fields", so I can fill them (like in Fast Report). Is it possible with TPrintPreview? I need print only a small invoice and I don't want use a big report component (like fast report, builder report, ...).

TPrintPreview doesn't offer something like a template. PPV file format is nothing useful. It's just a series of Metafiles saved all together as a single file.

But there is a simple solution to this problem:

1. Create your own template using WordPad and save it as an RTF file. In the template, enclose variable fields by braces or something similar to distinguish them from the other text.
2. Put a rich edit control on the form and set its visible property to false.
3. Before printing a new invoice, load the RTF file (template) into the rich edit control.
4. Use rich edit's FindText method to find a field in the text and use SelStart, SelLenght, and SelText properties of the control to replace the field with its actual value. Repeat this step for all fields.
5. Print the rich edit control using an instance of TPrintPreview.

Hope that it helps.

OK I want use Kryvich’s Delphi Reporter (http://sites.google.com/site/kryvich/reporter) to creare the RTF file. However the official Delphi RTF file not support many RTF "format" (it's orroble), for example table border with color or with background. Do you know a valid RTF component derivated from TCustomRichEdit to use with your component?

Try to use RxRichEdit control of RxLibrary,

Also RxRichEdit doesn't work for me. TRichView works (I see RTF correct) but I don't know how use it with your component, is it possible? Do you kwnow any other alternatives? Thanks again.

I never worked with TRichView.
If TRichView provides handle to an underlying windows rich edit control, you can use TPrintPreview to print it. To check it out, just type cast the TRichView instance as TCustomRichEdit and pass it to the PaintRichText method.

I just have tried it but not work...

Apparently TRichView doesn't rely on the Windows rich control.
TPrintPreview uses Windows API to render RTF content.