Re: pdf_tools printpdf com control

From: Pascal Chapuis (pascal.chapuis_at_online.fr_nospamm_please_thanks)
Date: 10/31/03 

Date: Fri, 31 Oct 2003 09:26:42 +0100

I apologize for my blindness...
but where did you find out this control ???

(your code should work with oleinitialize/uninitialize section)

pascal

"Barry" <barry_wells@ca4.uscourts.gov> a écrit dans le message de news:
3fa17056@newsgroups.borland.com...
> Does anyone use the pdf_tools printpdf com control? If so, how do you get
> the com control to work with delphi? I'm not familiar with com controls.
> Below is my code.
>
>
> unit Unit1;
>
> interface
>
> uses
> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
> Dialogs, StdCtrls, printerocxlib_tlb;
>
> type
> TForm1 = class(TForm)
> Button1: TButton;
> procedure Button1Click(Sender: TObject);
> private
> { Private declarations }
> public
> { Public declarations }
> end;
>
> var
> Form1: TForm1;
>
> implementation
>
> {$R *.dfm}
>
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> pdf_prt : pdfprinter;
> begin
>
> pdf_prt := pdfprinter.create(self);
>
> pdf_prt.PrintFile('c:\578585.pdf','HP LaserJet 1200 Series PCL','');
> end;
>
> end.
>
>

Quantcast