delphi-xe2相关内容

检索默认的Internet超时值?

我正在尝试获取 INTERNET_OPTION_SEND_TIMEOUT , INTERNET_OPTION_SEND_TIMEOUT 和 INTERNET_OPTION_RECEIVE_TIMEOUT 选项标志。 根据我的阅读,它们位于WinInit中。 以下代码无法使用进行编译:实际和正式var参数的类型必须完全相同, ,但此处哪个参数不正确? 过程TFrmWininetTim ..
发布时间:2020-10-20 18:59:31 其他开发

是否可以将TCombo编辑插入记号“变大”或“变粗”?

我有一个使用 TComboBox.SelStart 的模式来指示编辑文本字符串的进度。在这种模式下,我想对编辑插入符号进行某种更改,例如将其加宽到2像素或以某种方式“加粗”以指示此模式并引起更多关注。 解决方案 是的,正如Alex在其评论中提到的那样,可以使用API​​调用来完成。示例: 过程SetComboCaretWidth(ComboBox:TComboBox;乘数:整数); ..
发布时间:2020-10-20 18:59:28 其他开发

字符串列表和CSV

将CSV文件加载到其中后,如何基于Stringlist中的索引访问单个记录。 CSV示例: Record0; Record1; Record2 Record0; Record1; Record2 Record0; Record1; Record2 Record0; Record1; Record2 解决方案 SplitString 将使用您定义的定界符 ..
发布时间:2020-10-20 18:59:24 其他开发

根据数据库查询调用TEdit对象

我有一个带有7 TEdit的表单,其名称为EditPhone1,EditPhone2,依此类推。 在同一表格中,我查询数据库以获取填充这些TEdit的数据。当然,我无法事先知道查询将返回多少结果。 在循环查询行数时如何调用各种TEdit对象? 解决方案 使用 FindComponent 来“转换”。 var 编辑:TEdit; I:整数; 开始 DataSet.Fir ..
发布时间:2020-10-20 18:59:21 数据库

如何知道项目中的所有条件定义

如何看到Delphi项目的所有条件定义? 我可以在项目选项中定义某些内容,但是有一些“默认值”,我不知道在哪里寻找。您能帮忙吗? 解决方案 以下是我可以想到的条件定义的来源: 预定义的条件。 项目选项中指定的条件。 在命令行上指定条件。 在源代码中指定的条件(通常在.inc文件中)。 现在,我想您是在询问此列表中的项目1,即预定义的条件。 Delphi文档包含以下内 ..
发布时间:2020-10-20 18:58:19 其他开发

在FireMonkey iOS应用中更改TLabel的颜色,并将项目添加到TStringGrid吗?

我设法获得Xcode(在Windows下作为VM运行),在使用有效的公司证书进行XE-script-prep(创建Xcode文件夹)后,将XE2构建的FireMonkey iOS HD应用推送到我的(越狱)iPhone。 无论如何,伪造本地可可粉控件似乎有点老套,但要贴上一个TToolbar(带有标准iPhone渐变色的面板),几个TSpeedButton(具有这个奇怪的V斜率)事情发生了) ..
发布时间:2020-10-20 18:58:16 移动开发

Windows XP / 7复制文件挂钩

可以挂接文件夹修改操作(复制,删除,重命名等),但是不幸的是,我需要挂接应用于文件的那些操作。有什么想法吗? 环境: Delphi XE2,Windows XP / 7/2008 谢谢。 解决方案 我知道两个选择 1)您可以挂钩WinAPi功能,例如 CopyFile 和 CopyFileEx 创建一个系统范围的钩子,自己编写钩子,或使用API​​钩子库,如 mad ..
发布时间:2020-10-20 18:58:14 其他开发

Delphi XE2:遇到“错误阅读表”在IDE中打开项目时

我试图将包含200个项目的项目组从Delphi XE升级到Delphi XE2。某些IDE设计组件尚未安装在Delphi XE2 IDE上。 在Delphi XE2 IDE中打开某些项目时遇到错误: “错误阅读表格:找不到类TSynEdit。忽略该错误并继续吗? 注意:忽略该错误可能会导致组件被删除或属性值 丢失”。 这是由于未在Delphi XE2 IDE中安装TS ..
发布时间:2020-10-20 18:58:10 其他开发

在datasnap客户端中执行动态sql

是否可以在datasnap服务器和客户端之间共享数据库连接? 我想在客户端中执行动态sql并接收结果。 解决方案 我发现了两种在客户端执行动态sql的方法 1)使用DbxConnection(dbExpress) //服务器代码 函数TServerMethods1.GetConnection:TDbxConnection; 开始 结果:= DBConnection.D ..
发布时间:2020-10-20 18:56:55 其他开发

检测所有形式最小化的情况

我需要检测何时最小化表单(以隐藏覆盖表单)。我拦截了 WM_SYSCOMMAND 消息,如果我单击表单的“最小化”按钮,它会正常运行,但是如果我使用[Windows] + [M],似乎不会触发此事件。此外,在这种情况下不会触发 WM_ACTIVATE 和 WM_ACTIVATEAPP 。 我可以使用什么事件,还有什么其他情况需要检测? 解决方案 如此处所述, 如何检测何时最大化表单? ..
发布时间:2020-10-20 18:56:53 其他开发

TStreamWriter(Auto)Flush不?

尽管 Delphi中的文本文件编写性能中说了什么(注释在肯·怀特(Ken White)的回答下),我看到TStreamWriter 不用以下代码刷新: 过程TFrmAddEvents .LogEvent(AEvent:TcxSchedulerEvent); 如果没有分配则开始 (FStreamWriter)然后 开始 FStreamWriter:= TStreamWriter.Creat ..
发布时间:2020-10-20 18:56:49 其他开发

如何迭代TDictionary和删除项目?

我有一个TDictionary,并向其中添加了一些项目: 对于索引:= 0到10做 dict.Add(IntToStr(index),index); 现在,我需要迭代容器并删除想要的物品: pairEnum:= dict.GetEnumerator; 而pairEnum.MoveNext做 从 开始,如果pairEnum.Current.Value mod 2 ..
发布时间:2020-10-20 18:55:38 其他开发

如何在IMAP邮箱中搜索特定的电子邮件?

如何根据邮件中包含的特定文本检索特定的电子邮件?例如,Gmail搜索的工作方式。如果您搜索电子邮件中的特定文本,则Gmail将检索与该文本关联的消息。最好没有任何循环。 解决方案 您正在寻找 SearchMailBox 方法。这是一个简单的示例,期望您具有IMAP客户端(在这种情况下,IMAPClient 变量/html/TIdIMAP4.html“ rel =” nofollow nor ..
发布时间:2020-10-20 18:55:29 其他开发

跨越多个日期的酒店价格问题

问题与该问题有某种联系,除了我使用参数外。 按钮上有这个按钮: 过程TForm1.Button1Click(Sender:TObject); 使用ABSQuery1开始 确实开始 ABSQuery1.Close; ABSQuery1.SQL.Clear; ABSQuery1.SQL.Add(’从ROOM_RATES中选择*,其中CENIK_ID =:a4和ROOM_TYPE = ..
发布时间:2020-10-20 18:52:37 其他开发