Delphi

使用WaitForMultipleObject等待多个线程

我正在使用 WaitForMultipleObjects 函数来等待几个线程的完成,但是我做错了,因为结果不是预期的 查看此示例代码 键入 TForm1 = class(TForm) Memo1:TMemo; Button1:TButton; procedure Button1Click(Sender:TObject); private end; TFoo ..
发布时间:2017-04-28 19:55:03 Delphi

XSD到Delphi类没有XML绑定

可能这之前已经被问过了,但是我没有发现Delphi的问题 - 我在Visual Studio中使用了一个XSD.exe:将XSD转换成 'plain vanilla' 表示XSD中指定的实体的类 - 未绑定到XML文档 - 用于在XSD中创建结构的类,不访问符合XSD中概述的结构的数据。 我正在寻找一个可以做到这一点的实用程序或产品(这不花费大笔钱...):例如,我有一个这样的模式: / p ..
发布时间:2017-04-28 19:54:49 Delphi

D2010编译行数差异

在构建项目时,有两个地方报告来源行计数: 在编译进度对话框 在项目|下信息 在Delphi 2007中,这两个数字与我们正在构建的项目相同。 $ b $在德尔福2010年,这两个数字是截然不同的。 (第一)计数大于100万行或40%。 (第二)计数足够接近德尔福2007计数,以满足正在构建的正确的文件,代替移植到D2010的代码更改。源文件的替代版本在构建环境中根本不存在。 ..
发布时间:2017-04-28 19:54:25 Delphi

禁用表单仍然允许子控件接收输入

$ b我在delphi最后几天遇到了很多令人头痛的事情,我试图做的很简单,阻止了某个点的界面。 $ b 但是简单的说,我无法弄清楚为什么某些设计是允许的,所以要澄清: 1)创建一个项目 3)配置编辑和写入的OnExit事件: 启用:= False; 4)配置按钮的OnClick事件并写入: ShowMessage('这是对的)'; ..
发布时间:2017-04-28 19:54:13 Delphi

之后添加一个接口到一个类

是否可以添加并实现一个已经存在的类的接口(它是 TInterfaced 或 TInterfacedPersistent )完成将Model和View分为2个单元? 一个小的解释为什么我需要这样的东西: 我正在开发一个树型结构的开放式模型,它具有以下结构(非常简单和不完整,仅用于说明问题的大纲): Database_Kernel.pas TVMDNode = class(T ..
发布时间:2017-04-28 19:53:32 Delphi

“EOSError 1400 - 无效窗口句柄”的可能原因

我有一个问题。 我有一个使用线程的VCL应用程序。这个线程进行一些计算,并通过Synchronize()调用MainForm的方法。这一切都很好,我有一个“开始”按钮,创建和运行线程和一个“停止”按钮,停止并释放它。没有错误,没有任何东西。 但是由于某些原因,当我关闭应用程序,而我已经运行线程,我得到一个 EOSError 1400 - 无效窗口句柄。我已经断定了OnClose过程,我唯一 ..
发布时间:2017-04-28 19:53:20 Delphi

在Delphi 7中,我可以设置“Debug”和“Release”模式吗?

在大多数现代IDE中,您可以使用Debug和Release构建配置,您可以快速切换它们。 在Delphi 7中,这似乎不是可能。我必须转到项目设置并手动切换优化和所有的调试信息。 如果有一个插件或一些这样处理这个为我,这将是巨大的 有人知道一个吗?任何其他建议? 编辑:我无法升级到Delphi 2007或2009,因为我们有一个大的Delphi 7代码库,被转换。我同意,这 ..
发布时间:2017-04-28 19:52:44 Delphi

相当于代码中的设计师指南

VCL表单设计师为各自文本基线的对齐控件提供了粉色指南: 但据我所知,这对于标签和复选框不起作用。 更新:它适用于标签,如果您将控件准确地放在,例如按 Ctrl - 箭头。现在,在某些表单上,我创建了代码中的控件,例如 ed:= TEdit.Create(Self); ed.SetBounds(...); ed.Parent:= SomePanel; 等。我 ..
发布时间:2017-04-28 19:52:30 Delphi

delphi XE多单元命名空间问题

我正在Delphi XE中阅读RAD Studio Documentaion。 这里有一些文本。 [Delphi参考 - > Delphi语言指南 - >程序和单位 - >使用命名空间 - >搜索命名空间 - >多单位命名空间] 多单位命名空间 如果单位声明引用相同的命名空间,则多个单位可以属于同一个命名空间。 例如,可以使用以下单位声明来创建两个文件unit1.pas和un ..
发布时间:2017-04-28 19:52:18 Delphi

在Delphi中存储关键字

定义属性时,Delphi允许存储的关键字如下: 属性字段:TIndexDefs读取FFields写入SetFields FieldsStored; 关键字的目的是什么?它是做什么的? 解决方案 从我的Delphi 7帮助文件: 默认, nodefault指令称为 存储说明符。他们对程序行为没有 的影响,但 控制是否以 格式的形式保存已发布财产的 ..
发布时间:2017-04-28 19:52:05 Delphi

如何指导Delphi IDE使用OTA(Open Tools API)刷新修改的语法高亮颜色?

我正在写一个插件来整合 Delphi IDE主题编辑器 与Rad Studio IDE(当前版本的此工具作为外部应用程序运行)到目前为止,一切都正常工作(见下图),除了事实我不知道如何刷新Delphi IDE中选定的语法高亮颜色 让我解释一下,在标准选项中更改语法高亮颜色(编辑器选项 - >颜色)可以自定义任何元素并分配新的前景色和背景色,然后按。 OK。按钮IDE应用更改,IDE编辑器窗口 ..
发布时间:2017-04-28 19:51:40 Delphi

如何在DUnit中启用FastMM的内存泄漏跟踪?

在GUI测试运行器中,内存泄漏检查的菜单项为 无效(灰显)。有没有一个特殊的开关我还没有找到 激活他们? 使用DUnit 9.4(从Delphi 2009或源代码Subversion版本库)和 FastMM4.92 解决方案 您必须使用FASTMM和ManualLeakReportingControl指令构建DUnit GUI-testrunner。这将启用记忆体项目(请查看G ..
发布时间:2017-04-28 19:51:28 Delphi

我需要释放这些物品吗?

我正在使用Delphi 1 16位学习Pascal(不要笑,它工作正常,加上我买不起更新版本)。我使用TList来容纳一个简单的通讯录的对象引用。每个对象都被添加到TList中: DataList.Add(TAddrBookData.Create('Bob','1 Mill St ')); 我需要自己释放TAddrBookData对象吗?或者当TList.Free运行时, ..
发布时间:2017-04-28 19:51:04 Delphi

在C ++ Builder中启用安全异常处理

对于Windows 8应用程序认证,有(以及其他)这些要求: 3.2您的应用程序必须使用 / SafeSEH 标志以确保安全的异常处理 3.3您的应用程序必须使用 / NXCOMPAT 标志以防止数据执行 3.4您的应用程序必须使用 / DYNAMICBASE 标记进行编译,用于地址空间布局随机化(ASLR ) 我无法找到如何在C ++ Builder XE中启用其中的任何一个。 ..
发布时间:2017-04-28 19:50:52 Delphi

暂停一个线程不到一毫秒

在消息客户端测试应用程序中,生产者线程需要被限制以避免淹没服务器。 由于传输速率约为每秒25,000条消息(40每个消息的微秒),Sleep(1)造成的延迟太长了。 睡眠小于一毫秒包含与Windows API相关的一些信息。有没有Delphi的代码片段,类或库? 以下Bens答案我发现Sleep的值不同于15还提供不同的传输速率(Windows Vista): 每20封消息 ..
发布时间:2017-04-28 19:50:39 Delphi

使用Delphi的Tomes中的红黑树实现Promote()的问题

我正在使用Julian Bucknall在他着名的书“德尔福的Tomes”中写的红黑树实现。源代码可以在这里下载,我在Delphi 2010中使用代码,修改为 TdBasics.pas 让它在Delphi的现代版本中进行编译(大部分评论是大部分内容 - 树代码只需要一些定义。) 这是着名作家在一本经常推荐的书中的着名实现。我觉得我应该使用它坚实的地面。但是我使用 Delete()和 Prom ..
发布时间:2017-04-28 19:50:14 Delphi

具有Firemonkey的Delphi Xe2:您可以使用非默认Windows非客户端绘画风格的非客户端区域吗?

以下是使用firemonkey + Delphi XE2制作的delphi应用程序示例。 如您所见,您可以使用视觉样式“stylebook” Firemonkey可以自定义窗口框架内大部分内容的外观。然而,Windows框架的外部是使用Windows决定的任何样式绘制的。现在,如果我使用VCL而不是Firemonkey,我可以在深色配置中应用“VCL样式”和“皮肤”整个VCL应用程序。 ..
发布时间:2017-04-28 19:49:23 Delphi

为什么这个字符串的引用计数为4? (Delphi 2007)

这是一个非常Delphi的具体问题(甚至可能是Delphi 2007具体的)。我正在为一个实习的字符串编写一个简单的StringPool类。作为一个好的小编码器,我还添加了单元测试,发现让我很困惑的东西。 这是实习的代码: 函数TStringPool.Intern(const _s:string):string; var Idx:Integer; begin 如果FLis ..
发布时间:2017-04-28 19:49:10 Delphi