Article #16625: Printing a web page using the HTML control

 Question and Answer Database
FAQ1625D.txt — Printing a web page using the HTML control
Category :Printing
Platform :All
Product :
Question:
How do I print a WEB page with the HTML control?
Answer:
Use either the HTML control's AutoPrint method, or
alternatively use the PrintPage method.
Example using AutoPrint:
uses Printers;
procedure TForm1.Button1Click(Sender: TObject);
var
OldCur: TCursor;
begin
OldCur := Screen.Cursor;
with Printer do begin
BeginDoc;
HTML1.AutoPrint(handle);
Title := HTML1.URL;
EndDoc;
end;
Screen.Cursor := OldCur;
end;
4/2/99 11:24:16 AM

Last Modified: 01-SEP-99