头疼!这段程序怎么翻译成delphi的
{
DWORD dwNeeded, dwReturned ;
HDC hdc ;
PRINTER_INFO_4 * pinfo4 ;
PRINTER_INFO_5 * pinfo5 ;
if (GetVersion () & 0x80000000) // Windows 98
{
EnumPrinters (PRINTER_ENUM_DEFAULT, NULL, 5, NULL,
0, &dwNeeded, &dwReturned) ;
pinfo5 = malloc (dwNeeded) ;
EnumPrinters (PRINTER_ENUM_DEFAULT, NULL, 5, (PBYTE) pinfo5,
dwNeeded, &dwNeeded, &dwReturned) ;
hdc = CreateDC (NULL, pinfo5->pPrinterName, NULL, NULL) ;
free (pinfo5) ;
}
else
//Windows NT
{
EnumPrinters (PRINTER_ENUM_LOCAL, NULL, 4, NULL,
0, &dwNeeded, &dwReturned) ;
pinfo4 = malloc (dwNeeded) ;
EnumPrinters (PRINTER_ENUM_LOCAL, NULL, 4, (PBYTE) pinfo4,
dwNeeded, &dwNeeded, &dwReturned) ;
hdc = CreateDC (NULL, pinfo4->pPrinterName, NULL, NULL) ;
free (pinfo4) ;
}
return hdc ;
}
相关推荐
Delphi EXE + BPL + DLL框架(源代码和示例)
Delphi EXE + BPL + DLL框架(源代码和示例) 在Delphi开发领域,追求灵活与高效的你是否还在为频繁的EXE更新而头疼?来尝试这一革命性的框架设计吧!本资源为你呈现一个先进的Delphi应用程序架构,它将彻底改变你对传统单EXE应用的固有认知。 框架简介 此框架旨在提供一种模块化开发方案,通过结合EXE主程序、BPL(Borland Package Library)以及DLL(Dynamic Link Library),实现软件组件的独立管理和升级。这意味着,开发者可以针对任何功能模块进行独立修改或优化,而无需重新发布整个应用程序,极大提高了维护效率和部署灵活性。 核心优势 模块化开发:每个功能作为单独的BPL或DLL,便于团队协作和代码复用。 动态加载:运行时按需加载模块,减少启动时间,提升用户体验。 灵活升级:只需替换对应的BPL/DLL,即可完成特定功能的更新,无需整体覆盖安装。 易于维护:局部修改不影响全局,降低了版本迭代的成本。 包含内容 完整源代码:深入了解框架的设计原理与实现细节。 示例应用程序:实践是检验真理的唯一标准,通过实例快速上手,直观体
北洋标签打印机二次开发实战:DLL调用、打印流程与踩坑记录
在工业自动化和物流仓储场景中,标签打印机的软件集成是常见需求。开发者通常通过DLL二次开发或指令直发方式控制打印机,其中DLL封装了底层通信、状态查询和字符编码等复杂逻辑,能显著降低开发门槛。本文以北洋标签打印机开发包为例,详细讲解其初始化连接、标签任务创建、文本条码二维码绘制、打印参数设置等核心API调用流程,并分享多机并发、错误码排查、中文乱码、网口连接等实战经验。通过合理配置标签尺寸与偏移量,可快速实现稳定的批量打印,提升仓储管理效率。无论是C#、C++还是Python开发者,掌握这些方法都能有效应对
delphi 调试时总出现cpu窗口,ntdll.dll点的解决方法
delphi 调试时总出现cpu窗口,ntdll.dll点的解决方法delphi 调试时总出现cpu窗口,ntdll.dll点的解决方法
Delphi SpeedUp 2.7
Delphi工具,可以提升Delphi 7 IDE启动速度。
Delphi的IIS控制单元
最近为了解决一些IIS问题,很是头疼,资料很少,都是转过来转过去的东西,一点实用价值都没有 无意在网上搜到这个已经封装好的单元,简单地测试了下,可以正常使用 测试环境是XE2 + IIS6 + IIS7 原代码地址:http://read.pudn.com/downloads198/sourcecode/internet/webserver/933868/Delphi%20Class/IIS_5x_Class.pas__.htm 使用前需要引入(Import a Type Library)adsiis.dll、iisext.dll和activeds.tlb


Windows SDK/API
