delphi-xe2相关内容
我正在尝试获取 INTERNET_OPTION_SEND_TIMEOUT , INTERNET_OPTION_SEND_TIMEOUT 和 INTERNET_OPTION_RECEIVE_TIMEOUT 选项标志。 根据我的阅读,它们位于WinInit中。 以下代码无法使用进行编译:实际和正式var参数的类型必须完全相同, ,但此处哪个参数不正确? 过程TFrmWininetTim
..
我有一个使用 TComboBox.SelStart 的模式来指示编辑文本字符串的进度。在这种模式下,我想对编辑插入符号进行某种更改,例如将其加宽到2像素或以某种方式“加粗”以指示此模式并引起更多关注。 解决方案 是的,正如Alex在其评论中提到的那样,可以使用API调用来完成。示例: 过程SetComboCaretWidth(ComboBox:TComboBox;乘数:整数);
..
将CSV文件加载到其中后,如何基于Stringlist中的索引访问单个记录。 CSV示例: Record0; Record1; Record2 Record0; Record1; Record2 Record0; Record1; Record2 Record0; Record1; Record2 解决方案 SplitString 将使用您定义的定界符
..
我有一个带有7 TEdit的表单,其名称为EditPhone1,EditPhone2,依此类推。 在同一表格中,我查询数据库以获取填充这些TEdit的数据。当然,我无法事先知道查询将返回多少结果。 在循环查询行数时如何调用各种TEdit对象? 解决方案 使用 FindComponent 来“转换”。 var 编辑:TEdit; I:整数; 开始 DataSet.Fir
..
如何看到Delphi项目的所有条件定义? 我可以在项目选项中定义某些内容,但是有一些“默认值”,我不知道在哪里寻找。您能帮忙吗? 解决方案 以下是我可以想到的条件定义的来源: 预定义的条件。 项目选项中指定的条件。 在命令行上指定条件。 在源代码中指定的条件(通常在.inc文件中)。 现在,我想您是在询问此列表中的项目1,即预定义的条件。 Delphi文档包含以下内
..
我设法获得Xcode(在Windows下作为VM运行),在使用有效的公司证书进行XE-script-prep(创建Xcode文件夹)后,将XE2构建的FireMonkey iOS HD应用推送到我的(越狱)iPhone。 无论如何,伪造本地可可粉控件似乎有点老套,但要贴上一个TToolbar(带有标准iPhone渐变色的面板),几个TSpeedButton(具有这个奇怪的V斜率)事情发生了)
..
可以挂接文件夹修改操作(复制,删除,重命名等),但是不幸的是,我需要挂接应用于文件的那些操作。有什么想法吗? 环境: Delphi XE2,Windows XP / 7/2008 谢谢。 解决方案 我知道两个选择 1)您可以挂钩WinAPi功能,例如 CopyFile 和 CopyFileEx 创建一个系统范围的钩子,自己编写钩子,或使用API钩子库,如 mad
..
我试图将包含200个项目的项目组从Delphi XE升级到Delphi XE2。某些IDE设计组件尚未安装在Delphi XE2 IDE上。 在Delphi XE2 IDE中打开某些项目时遇到错误: “错误阅读表格:找不到类TSynEdit。忽略该错误并继续吗? 注意:忽略该错误可能会导致组件被删除或属性值 丢失”。 这是由于未在Delphi XE2 IDE中安装TS
..
从 https://ourmail.server/ews/services.wsdl ,在生成的services.pas中,最初出现了大量的“ WSDL文档中未表示的以下类型”在生成的services.pas中。 然后将wdsl文件下载到磁盘,看到它引用了 http://schemas.microsoft.com/exchange/services/2006/邮件和 http://schem
..
在Delphi中,可以声明整数值的子范围。例如: type myInt = 2..150 哪个将myInt类型的值限制为2到150。但是,如果我想限制字符串的长度怎么办? 如果我写: type myString =字符串[150] 我声明mystring的长度为150个字节,并将长度限制为0、1、2等。到150。但是如何将长度
..
如果我有两个这样定义的泛型列表: type pMyList = record a,b : 整数; c:字符串; 结尾; TMyList = TList
..
我以为我开始了解Unicode,但这使我不胜枚举: const c1 =#1 ; -> SizeOf()= 2 c2 =#33; -> SizeOf()= 2 c3 =#127; -> SizeOf()= 2 c4 =#128; -> SizeOf()= 1 c5 =#160; -> SizeOf()= 1 c6 =#161; -> SizeOf()= 1 c7
..
是否可以在datasnap服务器和客户端之间共享数据库连接? 我想在客户端中执行动态sql并接收结果。 解决方案 我发现了两种在客户端执行动态sql的方法 1)使用DbxConnection(dbExpress) //服务器代码 函数TServerMethods1.GetConnection:TDbxConnection; 开始 结果:= DBConnection.D
..
我需要检测何时最小化表单(以隐藏覆盖表单)。我拦截了 WM_SYSCOMMAND 消息,如果我单击表单的“最小化”按钮,它会正常运行,但是如果我使用[Windows] + [M],似乎不会触发此事件。此外,在这种情况下不会触发 WM_ACTIVATE 和 WM_ACTIVATEAPP 。 我可以使用什么事件,还有什么其他情况需要检测? 解决方案 如此处所述, 如何检测何时最大化表单?
..
尽管 Delphi中的文本文件编写性能中说了什么(注释在肯·怀特(Ken White)的回答下),我看到TStreamWriter 不用以下代码刷新: 过程TFrmAddEvents .LogEvent(AEvent:TcxSchedulerEvent); 如果没有分配则开始 (FStreamWriter)然后 开始 FStreamWriter:= TStreamWriter.Creat
..
我正在使用Delphi XE2。我的代码从SQL-Server 2008 R2数据库中提取数据。返回的数据是 nvarchar(max)字段,其中包含1,055,227字节的数据。我使用以下代码将字段数据保存到文件中: 过程WriteFieldToFile(FieldName:string; Query:TSQLQuery); var ss:TStringStream; 开始 s
..
我有一个TDictionary,并向其中添加了一些项目: 对于索引:= 0到10做 dict.Add(IntToStr(index),index); 现在,我需要迭代容器并删除想要的物品: pairEnum:= dict.GetEnumerator; 而pairEnum.MoveNext做 从 开始,如果pairEnum.Current.Value mod 2
..
如何根据邮件中包含的特定文本检索特定的电子邮件?例如,Gmail搜索的工作方式。如果您搜索电子邮件中的特定文本,则Gmail将检索与该文本关联的消息。最好没有任何循环。 解决方案 您正在寻找 SearchMailBox 方法。这是一个简单的示例,期望您具有IMAP客户端(在这种情况下,IMAPClient 变量/html/TIdIMAP4.html“ rel =” nofollow nor
..
我需要在启动FMX程序时创建启动画面。 VCL中的以下代码不再起作用: SplashScreen:= TSplashScreen.Create(应用程序); SplashScreen.Show; Application.Initialize; SplashScreen.Update; // FMX Application.Run中没有此类功能 问题是直
..
问题与该问题有某种联系,除了我使用参数外。 按钮上有这个按钮: 过程TForm1.Button1Click(Sender:TObject); 使用ABSQuery1开始 确实开始 ABSQuery1.Close; ABSQuery1.SQL.Clear; ABSQuery1.SQL.Add(’从ROOM_RATES中选择*,其中CENIK_ID =:a4和ROOM_TYPE =
..