中国程序员联盟 正在重新改版中ing 不便之处还请见谅 改版后将内容涉及java delphi .net php 收藏本站 | 站内搜索 | 会员登陆 | 文章发布 | 捐助本站  
 
  首页 | 数据库开发 | 网络通讯 | 多线程 | 多媒体开发 | 图像处理 | 程序人生 | 系统函数 | 控件开发 | Web服务
 
  当前位置：笨鱼delphi技术网>数据库开发>打印报表>文章内容

delphi 安装打印驱动

来源：站内 关于：bill 发布时间：2007-06-23   [收藏] [推荐]
procedure TForm1.Button1Click(Sender: TObject);
var
  s : array[0..64] of char;
begin
  WriteProfileString('PrinterPorts',
                     'DriverName',
                     'DRVFILE,FILE:,15,45');
  WriteProfileString('Devices',
                     'DriverName',
                     'DRVFILE,FILE:');
  StrCopy(S, 'PrinterPorts');
  SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, LongInt(@S));
  StrCopy(S, 'Devices');
  SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0, LongInt(@S));
end;

[浏览： 次]   
上一篇：delphi 使用打印机内置字体打印   下一篇：delphi 获取打印机状态
[收藏] [推荐] [返回顶部] [打印本页] [关闭窗口]  
    评论加载中…
google adsense热点文章
·delphi 获取打印机状态
·delphi 打印时改变纸张大小
·delphi 判断打印机能否打印的PostScrip
·delphi 检测存在打印机
·delphi Tmemo,TstringList,Tstrings打
·delphi 如何保存打印机信息到注册表
·delphi 判断系统是否有打印机连接
·delphi 在打印中间改变打印设置
·delphi 获取打印驱动，打印端口名
·delphi 使用打印机内置字体打印
·delphi 改变打印机的打印端口
·delphi 打印LabelsVCL组件
     delphi技术网 | firefox 下载 | Avant Browser下载 | dedecms 技术网 | drupal 爱好者 | php 技术网
  Copyright@www.delphichm.com,2006-2009.All Rights Reserved.
  
程序员联盟 | delphi Java .net|QQ:707102932