delphi-xe7

13热度

1回答

为什么TPath.HasValidPathChars接受'？'作为路径中的有效字符？

为什么System.IOUtils.TPath.HasValidPathChars接受'？'作为路径中的有效字符？我将第二个参数（UseWildcards）设置为false。所以，根据文件'？'应该被拒绝。但是，该函数对'c：\ test \ test？\'返回True。 UseWildcards =指定是否将掩码字符视为有效路径字符（例如星号或问号）。此功能的行为只是部分正确吗？该函数是否

2热度

1回答

TAction.OnExecute没有执行

我想简化一下表单状态到磁盘的保存。我使用从TIniFile派生的我自己的INI文件类来读取表单的“所有”控件的状态。事情是这样的： procedure TMyIniFile.Read(Comp: TComponent); begin if ValueExists(Section, Comp.Name) then begin if Comp.InheritsFrom(

1热度

2回答

在启动时从mainform自动加载第二个窗体时出错

这里是第一次业余程序员。希望得到一些帮助。使用Delphi XE7。我有一个Mainform，它有一个可以调出第二个窗体的按钮。在最初的启动时，我想单击出现第二个窗体的按钮，以便两个窗体都可见。然后我将它保存到一个配置文件中，以便它不会在每个负载上执行。当进行内部追踪时，我看到Form2为零，并且出现访问冲突错误。我认为问题在于MainForm尚未完全加载以提升Form2。或者Form2尚未创

0热度

1回答

如何枚举MTP和PTP设备

This answer说明如何使用WMI通过驱动器号查找连接的USB海量存储设备，但我试图找到连接MTP或PTP设备的（或UNC路径）的名称，如附加照相机或没有驱动器盘符的移动设备，以便我可以抓取他们的目录以搜索图像。我怎样才能做到这一点？

0热度

1回答

如何使用Indy Mime编码二进制数据？

我有一个Ansi字符串，我用它来存储二进制数据 - 在0-255范围内的字节（我知道它应该是一个字节数组左右，但它们之间差别不大）。我想通过Indy MIME（TIdEncoderMIME.EncodeString/TIdDecoderMIME.DecodeString）传递这个“二进制字符串”，并获得一个人类可读的字符串。我认为如果我使用IndyTextEncoding_8Bit编码，Enc

1热度

1回答

如何将Delphi Win32资源DLL转换为Delphi macOS应用程序？

我有一个Windows Delphi应用程序的资源DLL。我想将其移植到macOS，最终移植到iOS（仅适用于iPad，不适用于iPhone）。我还没有深入到VCL之外开发脚本（我甚至没有拥有Mac，尽管我知道我最终会需要一个）。 FireMonkey的东西，没问题（还）。我只是想知道如何将Windows资源DLL移植到其他平台。

3热度

3回答

如何在Delphi中获得MIME类型的标准文件扩展名？

在Delphi（XE7）中是否有一种内置方式可以获得给定MIME类型的标准扩展？我在寻找实施，将这样调用函数的最简单和最常用的方法： fileExt := GetExtension('text/xml');

1热度

2回答

如何设置默认值以在delphi中记录

我正在使用RAD XE7。在我的Delphi应用程序中，我想为记录字段设置默认值。我试过下面的代码，但它不能编译，我知道这是错误的。我还有其他方法吗？ TDtcData = record TableFormat : TExtTableFormat = fmNoExtendedData; DTC : integer = 0; Description : st

2热度

1回答

为什么Delphi应用程序有多个线程？

我已经看到我的Delphi应用程序有多个线程 - 更确切地说是7个。课程我不是创建自己的线程，而只是使用'经典'VCL控件。该程序空闲。它只是显示主窗体。没有对话框处于活动状态，没有个人/ Indy/etc线程正在运行。不应该只有一个线程（VCL主线程）？我如何知道这些（已经运行的线程）中的哪一个是主线程？注1：这是关系到Program freezes but the CPU utiliza

4热度

1回答

TMemo在处理大量行时非常缓慢

我在TMemo中有100000行。我想做类似的事情： for i:= 0 to Memo.Lines.Count-1 do Memo.Lines[i]:= SomeTrim(Memo.Lines[i]); 但速度是每秒0.5行!! 添加BeginUpdate/EndUpdate后，我没有看到任何速度改进。 Memo.Lines.BeginUpdate; for i:= 0 to M