procedure TForm1.PrinterSetupExecute(Sender: TObject);begin PrinterSetupDialog1.Execute;end;procedure TForm1.PrintExecute(Sender: TObject);begin //列印分
转载 2016-03-04 14:47:00
314阅读
2评论
DELPHI DATASNAP 2010 入门操作(1)为什么要用datasnap 2010  DELPHI DATASNAP 2010 入门操作(2)不写一行代码,绿色三层我也行   很久前写了点入门的资料,写得很不好,但是发现还是有很多人看了转了, 我写的东西都是很简单的,估计在行业里面混了几年的朋友,肯定会骂,这么没水平的,也好意思放出来?不过对于我来
揭阳红砖打包带,我公司同时代理瑞士RROMM电气动打包工具和日本KOHAN气动打包工具、缠绕机等包装设备,配套销售塑料护角、纸护角、拉伸膜、打包扣等包装辅料,欢迎各界朋友莅临参观、指导和业务洽谈。揭阳红砖打包带, 首先,将纸护角与打包带一起使用。在纸箱,印版,金属管和其他物品的每个角上单独放置一个纸护角,并用打包带将其拧紧。纸护角 是多张牛皮纸复贴后,经护角机定型压制而成,主要有L形和U形。纸护角
delphi文件打包方式 一创建.RES文件这里以一组音频文件为例。首先用记事本等所有文本编辑器编写文件“MyMusic.RC”。文件的格式及内容如下: SRC1 FILE1 OnlyYou.mp3 SRC2 FILE2 YesterdayOnceMore.mp3 SRC3 FILE3 MoonRiver.mp3 其中,每一行表示声明一项资源,每一项资源的声明包含三个
转载 2023-11-28 13:27:48
83阅读
var mdevice : array[0..255] of char; mdriver : array[0..255] of char; mport : array[0..255] of char; mhdmode : thandle; mpdmode : pdevmode; begin printer.getprinter(mdevice, mdriver, mpo
转载 精选 2006-08-01 17:18:52
5001阅读
2评论
android:layout_width="match_parent" android:layout_height="match_parent" > <EditText android:id="@+id/print_data" android:layout_width="match_parent" android:layout_
1.添加声明 f_count1: double; 2.得到拆分页数量 // Modified by 884 2018-04-20 14:50:18 AM0057 with aqTpCount do begin Active := false; sql.Clear; s_sql := 'select
转载 2018-04-20 15:54:00
189阅读
2评论
//PDevMode = _devicemodeW;// _devicemodeW = record// dmDeviceName: array[0..CCHDEVICENAME - 1] of WideChar; {打印设备名称,唯一值}// dmSpecVersion: Word; {DevMo
转载 2019-10-07 10:03:00
327阅读
2评论
问题:tagTVITEMA     =     packed     record               mask: &nb
在office工具中完成一份文件后,有时候我们会把文件导出为pdf格式,再把pdf文件发送出去(相较于其他格式文件,pdf文件更方便传阅)。当然啦,办公室里面少不了打印文件这个日常工作,打印pdf文件是基本的办公技巧。
delphi选择打印机:Delphi中获取打印机设备名和端口名 疯狂代码 http://www.CrazyCoder.cn/ :http:/www.CrazyCoder.cn/Delphi/Article11928.html uses Printers; {$IFNDEF WIN32} const MAX_PATH = 144; {$ENDIF} procedure TForm1.Button1C
转载 精选 2013-11-26 15:30:58
2802阅读
一、概述在银行,税务,邮政等行业的实际工作中,经常涉及到在印刷好具有固定格式的汇款单,储蓄凭证,税票等单据上的确定位置打印输出相关的信息。在此类需求中,精确地定位单据并打印相关信息,是解决问题的关键。一般情况下,开发者都是通过在打印机上通过重复的测试来达到实际需求。那么,有没有简单有效而又灵活的方法
转载 2017-08-21 13:54:00
177阅读
17点赞
1评论
如果用窗体.print打印的话,会导致一些控件打印不出来,比如下拉列表,还有打印TChart也会导致只打印成Label来显示代码:[co...
原创 2023-04-27 23:05:50
301阅读
Delphi 打印对象 Tprinter 介绍 Delphi 简化了打印时用户所必须了解的大部分内容。用户可以很轻松地写出简单的打印程序来输出文本和位图化了的图像。对于更为复杂的打印,仅需了解几个要领和技术,用户就可以实现任何类型的自定义打印。 Delphi 的TPrinter对象封装了 Windo
转载 2015-04-27 18:04:00
513阅读
2评论
获取默认打印机名:function TForm1.GetDefaultPrinterName: string; var   iSize: Integer;   sIniFile, sSection, sKeyName: PChar; begin   iSize :=&n
原创 2013-12-30 10:13:27
6818阅读
type TForm1 = class(TForm) Button1: TButton; ComboBox1: TComboBox; procedure Button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; {...} procedure TForm1.FormCreate(Sender: TObject); begin { tell printer to go to th
转载 2010-09-18 21:45:00
457阅读
2评论
{ paper selections } {$EXTERNALSYM DMPAPER_LETTER} DMPAPER_LETTER = 1; { Letter 8 12 x 11 in } {$EXTERNALSYM DMPAPER_FIRST} DMPAPER_FIRST = DMPAPER_LE
转载 2019-10-14 08:07:00
726阅读
〖3000〗-指定了未知的打印监视器。 〖3001〗-指定的打印机驱动程序当前正在使用。 〖3002〗-找不到缓冲文件。 〖3003〗-未发送 StartDocPrinter 调用。 〖3004〗-未发送 AddJob 调用。 〖3005〗-指定的打印处理器已经安装。 〖3006〗-指定的打印监视器已经安装。 〖3007〗-该指
wDoc := docapp1.Documents.open(ExtractFilePath(Paramstr(0)) + 'abc.doc'); wDoc.SaveAs(ExtractFilePath(Paramstr(0)) + 'tmp\2.rtf', wdFormatRTF); wDoc.c
转载 2016-04-12 09:49:00
123阅读
2评论
Delphi WinAPI EnumJobs -枚举打印队列中的作业 函数原型: //C++ BOOL EnumJobs( _In_ HANDLE hPrinter, _In_ DWORD FirstJob, _In_ DWORD NoJobs, _In_ DWORD Level, _Out_ LP
转载 2020-05-04 10:19:00
292阅读
2评论
  • 1
  • 2
  • 3
  • 4
  • 5