Questions tagged «delphi-xe»

2
始终禁用Delphi XE自定义生成目标
我已经.targets通过IDE 创建了一个自定义MSBuild 文件,该文件已包含在Delphi XE项目中,并从项目管理器的上下文菜单中启用了该文件。尽管该文件可以验证,但是在我重新保存项目文件后,它总是被禁用。 这是目标文件的简化版本,名为Custom.targets。 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <Target Name="Hello"> <Message Text="Hello from custom target"/> </Target> </Project> 作为独立文件,它可以按预期工作:键入... MSBuild Custom.target /t:Hello ...在命令行中给出了预期的消息。 Custom.targets通过IDE 添加到Delphi项目中,将在项目管理器中按预期显示该文件,并且该.dproj文件现在包含以下行: <TargetsFile Include="Custom.targets"/> 我在IDE的项目管理器中右键单击该文件,然后选择Enable。但是,在构建项目时,将Build显示消息窗口: [MSBuild警告] Custom.targets(1):忽略禁用的导入: PathToProjectSource\\Custom.targets 在项目管理器中再次右键单击仍会显示该Enable选项,而不是预期的Disable。 在命令行上MSBuild ProjectName.dproj /t:Hello也失败。 我试图破解.dproj文件以添加行... <Import Project="Custom.targets"/> MSBuild ProjectName.dproj /t:Hello现在可以输入。但是下次我从IDE保存项目文件时,该<Import>语句将被删除。 任何人都知道发生了什么事吗?

1
用于Delphi XE的SOAP服务器和客户端应用程序VCL + indy演示?
Delphi曾经包括用于Web服务的demos文件夹,但似乎不再包括它。 我只是尝试了Delphi 7演示项目(SOAPDMServerWAD一个完全没有UI的服务器,并且SOAPDMClient),但即使在Delphi 7中也无法使其正常运行。 如果有人曾经在Delphi XE或Delphi 2010中进行过类似的演示工作SOAPDMServerWAD+SoapDMClient,而与在Delphi XE中进行工作的旧演示相同,并且至少具有来自Delphi SOAP Server应用程序向导的最小UI,那将是完美的。 更新:该演示在Delphi 2010之前一直出现,但是使用了已经过时的WAD(web-app-debugger),我试图将其移植到新的Indy上runtime/web-app-development-harnessing-code,但是我似乎无法使其正常工作。该演示已运行,但该服务器没有用户界面,并且似乎没有运行任何HTTP服务器(已通过http://localhost:port/url 使用常规Web浏览器进行了测试。顺便说一下,尝试谷歌搜索一个演示,此URL出现,并且我不到一个小时前问,谷歌,这真是吓人。 Update2请参阅下面的我自己的答案,有关工作代码的链接即将发布。

1
BcdDivide函数在Delphi XE和XE2中的行为不同
FmtBcd.pas已在Delphi XE2中进行了广泛的修订和重写。在我的一个项目中,我有一个案例,对两个Bcd值使用除法运算,但是两个版本产生不同的结果。在最坏的情况下,Delphi XE2可能会抛出Bcd overflow error。 示例:在Delphi XE2控制台应用程序中运行以下代码: var A, B, C, D: TBcd; begin A := StrToBcd('1'); B := StrToBcd('3'); BcdDivide(A, B, C); WriteLn(BcdToStr(C)); try BcdMultiply(C, C, D); WriteLn(BcdToStr(D)); except on E: Exception do WriteLn(E.Message); end; ReadLn; end. 上面的输出将是: 0.333333333333333333333333333333333333333333333333333333333333333 BCD overflow 该变量C包含一个Bcd值,其特异性为63个小数位。BcdMultiply对变量执行第二次操作C将导致Bcd overflow error。 但是,在Delphi XE中运行相同的代码会产生以下结果,而不会出现任何异常提示: 0.3333333333 0.11111111108888888889 任何人都可以提出解决该问题的最佳实践方法吗?
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.