首页 > 代码库 > delphi 13 打印相关

delphi 13 打印相关

 
打印
页面设置
打印预览
文档属性
 
 
//------------------------------------------------------------------------------
procedure WB_Print();
begin
  Form1.WebBrowser1.ExecWB(OLECMDID_PRINT,1);
end;
//------------------------------------------------------------------------------


//------------------------------------------------------------------------------
procedure WB_PrintPreview();
begin
  Form1.WebBrowser1.ExecWB(OLECMDID_PRINTPREVIEW,1);
end;
//------------------------------------------------------------------------------


//------------------------------------------------------------------------------
procedure WB_PageSetup();
begin
  Form1.WebBrowser1.ExecWB(OLECMDID_PAGESETUP,1);
end;

//------------------------------------------------------------------------------
//属性需要文档是浏览模式的才能使用
procedure WB_Property();
begin
  Form1.WebBrowser1.ExecWB(OLECMDID_PROPERTIES,1);
end;
 
 
 
 


来自为知笔记(Wiz)