Delphi

Delphi 2009/2010和Windows API调用的Unicode问题

嗨,我一直在Delphi 2006中使用这个功能,但现在用D2010它会抛出一个错误。 我认为这与切换到Unicode有关。 功能TWinUtils.GetTempFile(Const扩展名:STRING):STRING; var 缓冲区:ARRAY [0 .. MAX_PATH] OF char; 开始 重复 GetTempPath(SizeOf(Buffer) - 1,Bu ..
发布时间:2017-04-25 00:41:14 Delphi

日期/时间操纵 - 友善的倒数字符串

我正在建立一个倒数到某个日期/时间的东西。我有工作 - 至少在小时,分钟和秒钟工作正常。我的问题是当我尝试实施天,它没有给出正确的结果。我知道DateUtils单位,但是那里有很多东西,我不知道如何做,特别是因为我在数学上很糟糕。 我有一个间隔为100的计时器。然后,我有一个全局 fDestDT 作为目的地日期/时间,以倒计时为基础。在定时器中,我有一个本地的TDateTime称为 DT 。 ..
发布时间:2017-04-25 00:41:00 Delphi

将AnsiString转换成Unicode字符串

我正在将D2006程序转换为D2010。我有一个值存储在我的数据库中每个字符串的单个字节,我需要将它加载到一个具有LoadFromStream的控件,所以我的计划是将字符串写入一个流,并使用LoadFromStream。但它没有奏效。在研究问题时,我看到一个问题,告诉我,我不太明白如何从AnsiString转换为Unicode字符串的工作原理。这是一个独立的代码,说明了我被以下问题所困惑的问题: ..
发布时间:2017-04-25 00:40:40 Delphi

在Delphi中线程加载图标

使用Delphi 2009,试图做一个启动器。 为了使它“snappy”我真的想加载图标在后台线程。 我已经使用这里找到的解决方案: 可以从中获取48x48或64x64图标Vista Shell? 如果不在一个线程中运行,这工作正常。 一旦我把它放在一个线程中,一些图标就不会被“获取”,或者是某种通用的图标。 我甚至尝试序列化线程(使它们有效),但它产生相同的结果。 所以 ..
发布时间:2017-04-25 00:40:28 Delphi

如何通过Delphi中的所有子目录搜索文件

我在Delphi中实现了这个代码,它将搜索文件或给定的名称,但省略搜索所有子目录。如何做到这一点? 代码: If FindFirst filePath,faAnyFile,searchResult)= 0然后 尝试 重复 lbSearchResult.Items.Append(searchResult.Name); 直到FindNext(searchResult) 0 ..
发布时间:2017-04-25 00:40:16 Delphi

推算货币价值四舍五入的方法

首先看到以下问题: SetRoundMode(rmUp)和四舍五入的”round“值,如10,结果为10,0001。 我需要将货币汇率上调,所以0.8205成为0.83,但上面显示的SimpleRoundTo行为给了我一些头疼。 我以一种安全的方式来计算货币价值? 解决方案 您可以使用Ceil功能: newvalue:= Ceil(oldvalue * 100)/ ..
发布时间:2017-04-25 00:40:04 Delphi

文件MD5校验和

在这个问题中提到了wcrypt2。 我需要的只是计算一个文件的MD5。如果我可以计算它而不必保存它是完美的,因为它是以流格式下载的文件。 我想要最直接的方法 谢谢! 解决方案 这是一个工作代码Indy 10: 函数MD5File(const FileName:string):string; var IdMD5:TIdHashMessageDigest5; ..
发布时间:2017-04-25 00:39:51 Delphi

大数据流与DataSnap

我试图在DataSnap服务器/客户端之间传输一些大流(〜1Mb),但没有用。我想了解Jim Tierney的代码( http:// blogs。 embarcadero.com/jimtierney/2009/04/06/31461 )没有运气,我甚至不能编译代码,因为一个丢失的图书馆,无论如何... 我可以接收的流的最大大小为64k,所以任何提示/想法/代码示例,您可以为周末程序员提供我 ..
发布时间:2017-04-25 00:39:38 Delphi

如何将PDF转换为BMP / PNG / JPG等

我有一个这样的情况,我需要将PDF文件转换成最适合以特定分辨率的PNG。 我知道imagemagick使用convert.exe进行某种转换,但是每次都会崩溃,我使用的是Windows 7 x64 。 p> 转换的首选方法是集成在 delphi 7组件中的东西,但是我也可以使用命令行,如果这是需要做的工作。 我的主要关注点是我不希望这种情况对于类似消息的人来说就是崩溃了 htt ..
发布时间:2017-04-25 00:39:26 Delphi

移动位图像素

如果我想移动/移动位图的像素,我该怎么做? procedure MovePixels(Bitmap:TBitmap; Horizo​​ntal,Vertical:Integer); begin {将位图像素移动到新位置} end; 示例: 通过调用 MovePixels(Image1.Picture.Bitmap,20,20) ..
发布时间:2017-04-25 00:39:12 Delphi

德尔福2010控制闪烁

我已经从XP操作系统升级或迁移我们的软件,以便能够在Windows 7下进行编译和运行。我们的软件开始显示Windows XP中没有注意到的问题。目前,我正在处理一个用户定义的控件在TForm上闪烁。 似乎每个闪烁,而不是总是,但当它闪烁它是非常明显的。我已经为TForm和TTrendChart类设置了DoubleBuffered,但没有帮助。 这是一个用户自定义的TCustomPanel ..
发布时间:2017-04-25 00:39:00 Delphi

如何弹出“连接到”对话?

如何弹出窗体使用delphi? 是 ShellExecuteEx 或 ShellExecute 可以这样做吗? 解决方案 从命令行可以做到这一点。 (至少在Win7上为我...() rundll32.exe van.dll,RunVAN 所以,只需将它包装在一个合适的 ShellExecute 或类似的调用中。 请注意,该对话框旨在弹出系统托盘,我不 ..
发布时间:2017-04-25 00:38:46 Delphi

使用Delphi7 TClientDataSet:是否可以将其保存为缩进格式的XML内容

我正在使用Delphi7 ClientDataSet读取和写入我的一些数据的xml文件。 Howerver,当我想在程序外浏览(双击xml在Windows资源管理器中)我得到'在文本内容中找到一个无效的字符。处理资源时出错 - 即使数据在Delphi内读取和写入也不错。 有没有办法强制TClientDataSet以缩进的方式写入内容一行? 这样我就可以轻松地将其打开到一个文本编辑 ..
发布时间:2017-04-25 00:38:34 Delphi

德尔福2010图像在Tbutton衰落/闪烁

当我设置一个Button的imageindex和images属性(从imagelist组件/ pngs),启动程序并单击按钮,图像缓慢闪烁/淡入淡出。如何防止这个和什么似乎是问题? 解决方案 它似乎是一个Tbutton的doubleBuffered属性。当设置为false时,图像闪烁,设置为true时它正在工作。这种情况发生在Win 7上,启用了航空。 ..
发布时间:2017-04-25 00:38:07 Delphi

异常从线程调用远程SOAP调用

这是这个问题我几分钟前问过。 我有一个主窗体和线程的Delphi应用程序。线程每X秒发出一个远程对象的Web服务请求。然后,它会发回到使用新信息更新UI的主窗体。 我以前在我的线程中使用了TTimer对象,当TTimer回调函数跑了,它在主线程的上下文中运行(但是远程Web服务请求确实有效)。这相当于打破了单独的线程的目的,所以我现在在我的线程的Execute函数中有一个简单的循环和休 ..
发布时间:2017-04-25 00:37:40 Delphi

如何使用命名管道绑定从Delphi与WCF进行通信

如果是这样,那么如何? 我可以使用Delphi 2007与WCF服务通信使用netnamedpipebinding吗? =“h2_lin”>解决方案 我建议您使用.NET(和WCF!)为您的服务创建COM可见代理,然后像Delphi一样使用COM对象。 p> 为了在NetNamedPipesBinding端点上监听WCF服务的本机客户端,有几个原因是非常复杂的。有关详细信息,请参阅 ..
发布时间:2017-04-25 00:36:53 Delphi

如何编辑mp3文件的详细信息(Delphi)

如何使用delphi编辑mp3文件的详细信息,如说明,标题,字幕,评分,艺术家等。是否有任何要做的事情? 谢谢 解决方案 您可能可以操作不仅ID3V1,而且ID3V2。 所以,这是可以帮助您的图书馆 http://www.3delite.hu/Object Pascal开发人员资源/ id3v2library.html ..
发布时间:2017-04-25 00:35:57 Delphi

我可以定义只能包含这些值的MyType吗?

我有这个问题:如果我有这样的值:'AA','AB','AC','BC' - 我可以定义只能包含这些值的MyType吗? 我想在模式下做: 键入MyType = ...; // something var X:MyType; begin x:='AA'; //有效,'AA'包含在X X:='SS'中; //无效,“SS”不包括在X中,而不是引发异常。 结束 ..
发布时间:2017-04-25 00:35:44 Delphi

(Delphi)使用函数指针参数调用DLL

调用外部DLL并传递一个函数(指针)作为参数。 我最近有不同的问题,传递一些参数到DLL,你帮助。 希望有人知道如何做到这一点.... 这里是需要从Delphi调用的DLL(cpp)中的函数声明: / p> typedef void(* PTR_Allocate)(char **,unsigned long *); typedef void(* PTR_Dealloc ..
发布时间:2017-04-25 00:35:32 Delphi

在运行时提出的EClassNotFound是什么意思,当有问题的类在编译和链接的时候,有明确的代码?

我在rtl Streaming in一个表单中出现运行时错误,导致在执行TReader.ReadRootComponent时引发异常EClassNotFound。特别的错误消息是“Class not found TActionList”。 奇怪的是: 我的主窗体使用Action列表。 为了好玩,我将ActnList.pas(从VCL源文件夹)添加到我的项目中,尝试修复它。 > ..
发布时间:2017-04-25 00:35:12 Delphi