请问一下，在DELPHI里，怎么通过代码直接启动系统的打印机的“打印机端口”添加的这个窗口
或者通过代码怎么实现添加新的打印机端口（比如增加一个192.168.1.111的网口打印机端口）
特别 说明一下：**是打开这个打印机端口的窗口！！**
DELPHI怎么通过代码打开系统的“打印机端口”添加的这个窗口
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
分享- 邀请回答
-
2条回答 默认 最新
- 2018-08-07 05:19回答 1 已采纳 shellexecute / winexec 调用 control printers 手上没有delphi，用C#演示下 ![图片说明](https://img-ask.csdn.net/up
- 2017-10-24 15:10回答 2 已采纳 执行 rundll32 printui.dll,PrintUIEntry 命令会弹出具体的参数 然后在代码中使用WinExec执行即可。
- 2017-03-03 07:36回答 4 已采纳 给你个思路：fom1提供个外部保存数据库接口：SaveToDb（const v_Data：DATA）；这里面你只要取出DATA结构体数据保存到数据库就行了 在form2点击保存的时候，引用form1
- 2009-05-18 17:42limon758的博客 Delphi中获取打印机设备名和端口名 [code="c++"]uses Printers; {$IFNDEF WIN32} const MAX_PATH = 144; {$ENDIF} procedure TForm1.Button1Click(Sender: TObject); var pDevice : pChar; ...
- 2021-06-17 10:02回答 2 已采纳 MDI子窗口不能关闭应用程序，要主窗口才可以。
- 2018-08-11 11:46回答 2 已采纳 delphi webbrowser
- 2019-06-07 13:58回答 1 已采纳 在label1.Text:=xxx 下面加上 Application.ProcessMessages;
- 2013-05-01 16:52weixin_30345055的博客 Delphi中获取打印机设备名和端口名uses Printers;{$IFNDEF WIN32}const MAX_PATH = 144;{$ENDIF}procedure TForm1.Button1Click(Sender: TObject);var pDevice : pChar; pDriver : pChar; pPort : pChar; hD...
- 2018-08-09 05:01回答 3 已采纳 抱歉，我google了下，现在的delphi好像直接支持了多列图标，看这里： https://stackoverflow.com/questions/14903647/shifting-the-er
- 2018-09-10 08:38回答 2 已采纳 Button Style属性设为 bsSplitButton
- 2018-08-11 13:31回答 1 已采纳 类似这个：https://blog.csdn.net/delphi308/article/details/16947713
- 2007-11-19 22:41happy_tiger的博客 Delphi中获取打印机设备名和端口名uses Printers;{$IFNDEF WIN32}const MAX_PATH = 144;{$ENDIF}procedure TForm1.Button1Click(Sender: TObject);var pDevice : pChar; pDriver : pChar; pPort : ...
- 2018-04-21 01:08回答 3 已采纳 delphi程序很难反编译，因为它生成的是机器代码。 机器代码的运行结果和你的源代码等价，但是不是一一对应的。或者说的更直白一点，相同的机器码可能由无数种源代码编译得到，而可读性良好的那一种只是这无
- 2021-09-07 15:10dawn_rainy的博客 不知道还有多少像我这样的程序员，发挥着余热，在公司做安卓开发，却一直维护着一个Delphi的打印项目。现如今，找资料是真难。我一直都很懒，想着拼拼凑凑了好几天弄明白的东西，还是记录下来。也许，就刚好有人需要...
- 2017-05-23 14:47紫松Win的博客 {设置打印机} Assignfile(RPrinter,'LPT1'); {准备写文件} Rewrite(RPrinter); {向后倒纸} //Writeln(RPrinter,chr($b)+chr(27)+'K'+chr(40)); {打印} Writeln(RPrinter,'测试:****'+(Edit1.text...
- 没有解决我的问题, 去提问
