Delphi

PNG在德尔福2009图像清单和图像

D2009引入了PNG对图像和图像列表的支持。 但是... 我有一个imagelist包含png图像与alpha。我想使用TImage将其中一个放在表单上。如何做到这一点,让图像很好地合成? 作为一个问题的例子,我面临的代码无法正常工作,并产生显示的效果: ImageList.GetBitmap(index,Image1.Picture.Bitmap); ..
发布时间:2017-04-25 00:29:50 Delphi

如何在Delphi应用程序中从另一个Delphi应用程序启动事件?

请在标签之前阅读 。 我正在创建一组依赖智能卡进行身份验证的应用程序。到目前为止,每个应用程序都分别控制了智能卡读卡器。在几个星期内,我的一些客户将同时使用多个应用程序。所以,我想也许创建一个控制身份验证过程的服务应用程序会更加实用。我希望我的桌面应用程序告诉他们对认证过程感兴趣的服务应用程序,然后服务应用程序将向他们提供有关当前用户的信息。这个部分很简单,使用命名管道。很难的是,服务如何告 ..
发布时间:2017-04-25 00:29:25 Delphi

德尔福2010平板电脑支持

当我不得不购买德尔福的工作时,我看到的一个大卖点就是支持平板电脑的能力。现在,我所在公司的客户想要使用平板电脑。我一直在努力寻找平板电脑的delphi的例子,但我没有找到任何。有人有经验吗?任何类型的教程或示例? 当组件获得焦点并在丢失虚拟键盘时隐藏它,我似乎无法带来虚拟键盘。 / p> 解决方案 Delphi 2010向Delphi介绍了一些很好的触摸和手势支持。 要获取更多 ..
发布时间:2017-04-25 00:29:02 Delphi

使用SMTP发送电子邮件与Delphi连接超时错误?

如何使用delphi 2010发送电子邮件地址,例如(修复电子邮件,密码丢失或任何html /纯文本电子邮件。 我尝试使用以下代码但是,当尝试发送邮件时,我会收到 EIdSocket Eroor消息“Socket Error#10060 Connection Timed Out”。 程序TForm5.btnSendMailClick(Sender:TObject); begin ..
发布时间:2017-04-25 00:28:39 Delphi

线程消息循环为一个隐藏窗口的线程?

我有一个Delphi 6应用程序,它具有专门用于与使用SendMessage()和WM_COPYDATA消息的外部应用程序进行通信的线程,以与外部程序接口。因此,由于SendMessage()函数只接受窗口句柄而不是线程ID,因此线程消息队列不能正常工作,因此使用AllocateHWND()创建一个隐藏窗口。我不知道什么是在线程Execute()方法。 我假设如果我使用GetMessage( ..
发布时间:2017-04-25 00:28:27 Delphi

我如何知道用Delphi创建一个项目的版本

如果我有一个完整的源代码到一个delphi项目,我该怎么知道什么版本(即Delphi 5,Delphi 7,Delphi 2010等)被用来创建它,而不在Delphi中打开它? 我有一些可追溯到Delphi 6时代的项目,我想分类。但是我不想在各种版本的Delphi中打开每个版本,以确定要使用的版本。 解决方案 Delphi project.dof [FileVersi ..
发布时间:2017-04-25 00:28:15 Delphi

如何将int转换为货币?

我正在与德尔福2009年合作,解决了我的问题,但是我已经得到的答案已经过时了,因为Delphi2009不知道StrtoFloat。我正在问如何将一个整数转换为“1900000”到“1,900,000”? 解决方案 您还可以使用格式命令。因为格式需要一个实数,所以将0.0加到整数上有效地将其变成一个扩展类型。 Result:= Format '%.0m',[intValue + 0. ..
发布时间:2017-04-25 00:27:14 Delphi

Delphi编译错误E2064左侧无法分配给

我继承了一个Delphi应用程序,我对对象pascal一无所知。 这是一个BPL,我需要编译到新版本的C ++ Builder XE 。 当我运行make时,我得到错误: E2064左侧无法分配给。 我学到了足够的obj pascal来知道我有一个常数,试图被赋予一个值。 但是,显然你可以骑这个behanvior;通过进入Delphi编译器下的Build选项并打开“可 ..
发布时间:2017-04-25 00:27:01 Delphi

德尔福编码标准

我正在编写(下)我们公司的Delphi编程编码标准,所以任何人建议以什么为基础,任何你建议使用/不使用的东西? 解决方案 我使用 Delphi语言编码标准文件作为内部文件的基础。 对象帕斯卡风格指南可能被称为”官方“之一,我认为 - 只要有这样的事情。 ..
发布时间:2017-04-25 00:26:49 Delphi

将LogFont高度转换为字体大小

我有一个LOGFONT结构。现在我想做的是从LOGFONT高度得到相关的字体大小。 解决方案 当映射模式是 mm_Text (通常是这样),当 lfHeight 字段为正时,它已经给出了高度。当它是负数时,单位是像素。 用于LogFont的MSDN 为您提供了在它们之间转换的公式: lfHeight = -MulDiv(PointSize,GetDeviceCaps(hDC,LOG ..
发布时间:2017-04-25 00:26:38 Delphi

用于枚举的Delphi RTTI SetValue

如何使用RTTI设置枚举字段的值? 即, type TCPIFileStatus =(fsUnknown,fsProcessed); TTest = class FStatus:TCPIFileStatus; 结束 ... var 数据:TTest; Ctx:TRttiContext; 状态:TCPIFileStatus; begin 数据:= TT ..
发布时间:2017-04-25 00:26:24 Delphi

如何将网页下载到变量中?

我不在乎它是字符串,字符串列表,备忘录等,但不是磁盘文件 如何下​​载竞争网页变成一个变量?谢谢 解决方案 使用Indy: const HTTP_RESPONSE_OK = 200; 函数GetPage(aURL:string):string; var 响应:TStringStream; HTTP:TIdHTTP; begin 结果:=''; 响应 ..
发布时间:2017-04-25 00:25:46 Delphi

同步滚动组件Delphi

我正在尝试同步一个VCL Forms应用程序中两个TDBGrid组件的滚动,我有困难拦截每个网格组件的WndProc没有一些堆栈问题。我已经尝试在滚动事件下发送WM_VSCROLL消息,但这仍然导致错误的操作。它需要单击滚动条,以及突出显示单元格,或向上或向下鼠标按钮。整个想法是让彼此相邻的两个网格显示一种匹配的对话框。 尝试 / p> SendMessage(gridX.Handl ..
发布时间:2017-04-25 00:24:22 Delphi

是否有任何“Pos”功能查找字节?

var FileBuff:TBytes; 模式:TBytes; begin FileBuff:= filetobytes(filename); 结果:= CompareMem(@Pattern [0],@FileBuff [0],Length(Pattern)); 结束 是否有任何功能,如 Result:= Pos(@Pattern [0],@File ..
发布时间:2017-04-25 00:23:42 Delphi

在DLL中使用IXMLDocument需要CoInitialize?

使用 IXMLDocument (msxml wrapper)时,有没有理由在我的DLL函数内使用 CoInitialize ? (或其他com对象) 调用应用程序/线程是否负责调用 CoInitialize / CoUninitialize ? 如果我在我的DLL中使用 ComObj 如果自动调用 CoInitialize 在其初始化部分和 CoUninitialize 在其完成部分 ..
发布时间:2017-04-25 00:23:17 Delphi

将SQL登录凭证传递给Delphi Datasnap服务器最有效的方式?

由于我的应用程序中的一些安全性在数据库级别处理,所以我需要传递一个用户的从我的客户端应用程序到我的Datasnap服务器的SQL凭据。 (如果可能,我试图使Datasnap服务器无状态,因此请确认每次调用都必须执行此操作。) 我在客户端使用ClientDatasets(CDS),所以我可以使用OnBeforeGetRecords将OwnerData OleVariant中的数据从客户端 ..
发布时间:2017-04-25 00:21:59 Delphi

压缩组件

我正在寻找支持Delphi2010的压缩组件,并允许我执行以下操作: 创建.zip存档 从.zip存档中提取 删除.zip存档 我还需要该组件可以免费使用商业用途,并且可能不使用/依赖于DLL(我不介意如果是)。 到目前为止,我已经研究了 ZipForge , FlexCompress , KaZip 和 UnRAR ,但是我发现我需要购买ZipForge和FlexCompr ..
发布时间:2017-04-25 00:21:42 Delphi

具有Alpha混合图标的Imagelist丢失透明度

以下是(或多或少)相关的问题: Delphi - 在运行时使用图标填充图像列表”破坏“透明度。 我已经测试过@TOndrej 答案。但是,似乎我需要启用视觉样式(XP Manifest)才能使其工作(Windows常用控件的版本6.0将被使用 - 我现在不想要的)。我在运行时通过 ExtractIconEx 和 ImageList_AddIcon 。添加图标。 显然设置 ImageLi ..
发布时间:2017-04-25 00:21:11 Delphi