Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Как распечатать веб-страничку при помощи HTML-контрола?

01.01.2007

Можно использовать два метода HTML контрола: AutoPrint или PrintPage.

Пример использования AutoPrint:

--------------------------------------------------------------------------------

Как распечатать WEB страничку при помощи HTML контрола

Можно использовать два метода HTML контрола: AutoPrint или PrintPage.

Пример использования 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;

Взято из https://forum.sources.ru