Программы   Загрузка Партнерство   О компании Контакты  
 
                    
  Карта Сайта   
   





Как распечатать 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;

           




Программы  |  Загрузка  |  Партнерство  |  О компании  |  Контакты

Copyright © LSD Software 2006 - 2011