TStringlist 为 function 结果，最小代码序列

[英]TStringlist as function result, minimal code sequence

如何从 function 返回一个 Stringlist 之前已经讨论过很多次了。 我的代码序列版本 1 只是概述了如何做。 是否有任何选项可以使用“无额外代码”修复版本 2 中的 memory 泄漏，这种方法到底有多危险，如果我的字符串列表只是几个字符串项，这会导致任何失败，memory 问题不会 ...

如何检测是否单击了 Windows 开始（Orb）按钮？

[英]How to detect if Windows Start (Orb) button is clicked?

在 Delphi 中，是否可以检测用户何时单击 Windows 的“开始”按钮（左下角调出菜单的按钮）？ 我尝试创建自己的“开始”菜单，因此当单击“开始”按钮时，它将显示我的菜单而不是 Windows 的菜单。 我的想法是，当 Windows 启动时，我的应用程序将在系统托盘中自动运行，并检测用户 ...

TIdFTP 恢复 TLS session 的数据连接

[英]TIdFTP resumption TLS session of data connection

如何启用 TLS session 恢复与TIdFTP的数据连接？ 我正在使用 Delphi 11.2 Embarcadero® RAD Studio 11 版本 28.0.46141.0937 附带的 Indy 10.6.2.0 编辑 2023-04-12T06:41:35.496Z 我仍然收到消息 ...

编组字符串时如何覆盖默认编码？

[英]How can I override default encoding when marshalling strings?

我有一个 Delphi 2007 DLL 这个出口：function TestSignString(s, Sign: PChar): LongBool; stdcall; 我使用此导入在 .NET Core v7 C# 中调用它：[DllImport(@"LibraryName.dll")] [ ...

Delphi 与图形和 AnsiStrings 单元相关的版本特定编译

[英]Delphi version specific compilation related to graphics and AnsiStrings units

我有一个单元，我想在任何 Delphi 版本下编译，比方说 Delphi 2006。 它有下一个编译有问题的代码： 而函数 StrLen、StrCopy 会产生“已弃用。已移至 AnsiString”的警告。 问题是：如何解决所有问题？ 图形从哪个编译器版本变为 vcl.graphics，StrLe ...

TStringList.CustomSort：Compare() 与变量

[英]TStringList.CustomSort: Compare() with variables

我正在尝试按 a.CSV 文件中的列对 TStringList 进行自定义排序。 我下面的代码有效（慢慢地，200,000 多行大约需要 14 秒）： 我想要做的不是硬编码而是（注释“应该是一个变量”取决于要排序的列）。 我知道我不能使用： 用于插入变量，因为我收到错误： 不兼容的类型：“方法指针和 ...

我如何创建/使用 IBuffer？

[英]How do i create/use an IBuffer?

我想使用Winapi.Security.Cryptography.Core_IAsymmetricKeyAlgorithmProvider的函数，它有一个IBuffer类型的参数。 我不知道如何使用 IBuffer 或如何向它提供数据。 我试过 allocationg memory 并给 func ...

FireDac 中的实时数据

[英]Live Data in FireDac

在 FireDac 中是否有可能从数据库（在我的例子中是 SQL Server）中获取实时数据，而不像在 Paradox 中那样更新数据源。 我能找到的最接近的东西是 FDTable 的 Live Data Window，但是信息非常少，我什至不确定 Live Data Window 意味着数据是自 ...

IContextMenu::QueryContextMenu 返回不相关的菜单

[英]IContextMenu::QueryContextMenu return not relevant menu

网络连接快捷方式（Ethe.net、Wi-Fi 等）具有不同的上下文菜单，具体取决于连接 state（已连接/已断开连接）。 我使用以下代码 (Delphi) 来检索和显示此菜单。 但是在更改连接 state 后，我一直得到旧菜单。 重新启动应用程序后，我有时会得到正确的菜单，但是，大多数时候我没有 ...

带 CommaText 的字符串列表返回逗号和空格，而不仅仅是 Delphi 中的逗号

[英]Stringlist with CommaText is returning comma and spaces instead of just comma in Delphi

我有一个字符串列表，每个字符串看起来像这样。 然后我将该字符串添加到另一个带有逗号文本的列表中，并且应该给出这样的结果 相反，它返回 似乎它会像我想要的那样为每个逗号创建一个新字符串，但也会为我不想要的每个空格创建一个新字符串。 添加代码以防万一。 ...

libeay32.dll和ssleay32.dll同时需要32位和64位

[英]libeay32.dll and ssleay32.dll need 32 and 64 Bit simultaneously

我使用 Delphi Seattle，我的应用程序有一个 32 位 Exe 和另一个 64 位 Exe。 对于某些操作，如 MS Graph API，我需要这些 DLL（libeay32.dll 和 ssleay32.dll）。 两个 Dll 的名称相同，我如何确保我的 Exes 使用匹配的位 DL ...

记录类型到临时变量

[英]Record type to temporary variable

如何将记录存储到临时变量并通过 function 传递？ 如果我有两条记录，例如： 现在我希望能够做这样的事情： 并且还可以将其恢复为原始类型，例如： 最后一个完整的 function 应该可以做到以下几点： 我尝试过 Variant、TObject、NativeUInt 转换，但似乎没有任何效果。 ...

TVirtualStringTree 向节点文本添加特定序列代码

[英]TVirtualStringTree adding certain sequence code to nodes text

我有 TVirtualStringTree 并且正在尝试将其文本修改为下一个（代码+文本）： 我创建了这个 function，它为此目的创建了测试节点： 但是当运行代码时，它以某种方式在这一行中给出了访问冲突（在循环中的第三次计数之后）： 我注意到RootNod已分配，但其所有数据都显示无法访问的值 ...

Delphi TStringList 作为 object 字段

[英]Delphi TStringList as object field

这可能已经被问过很多次了，但如果是这样，我一辈子都找不到答案。 所以如果是这样的话，我提前道歉。 我在 Delphi 单元中有这个 object。 我正在整理来自一个来源的雇主列表，这些来源的类型为TEmployerData ，如下所示。 整理好雇主名单后，我将从属于每个雇主的其他来源收集员工和工资 ...

设计时的组件如何确定项目目录

[英]How can a component at designtime determine the project directory

我写了一个组件，它应该存储一些与项目目录相关的信息。 每次更改我的组件的属性时，它都应该写入一个文件。 那么一个组件如何在设计时确定当前的项目目录。 提前致谢编辑： 我想在每次更改组件的属性时生成一个 delphi 源文件，以便在编译代码时始终获得最新版本。 将其视为一种代码生成器。 目前，我设置了 ...

使用 Delphi 64 位检测虚拟化环境？

[英]Detect virtualized environment with Delphi 64-bit?

如何为 64 位 Delphi 应用程序完成此操作？ 如果我尝试将其编译为 64 位，我会收到消息“Unsupported language feature: ASM”和“Operand size mismatch”。 我知道您需要将 asm 代码与 pascal 代码和寄存器分开，但不知道该怎么 ...

XSuperObject：这个日期字段有什么问题？

[英]XSuperObject: what's wrong with this date field?

大部分都有效。 例如job['Id'].AsString评估为'POS-10'等。 但是job['StartDate.Date'].AsString计算结果为'43891'和 EndDate 的计算结果为'44355' 。 我究竟做错了什么？ 那是作业 ID = POS-1 雇主名称 = Acm ...

如何使用 SuperObject 库在 Delphi 中创建 JSON 文件？

[英]How to create JSON-file in Delphi using SuperObject lib?

我正在使用Delphi 2010 和超级对象库。 我了解如何解析 json 文件，但不知道如何创建 json？ 该算法是： 解析 JSON 并加载到 TStringGrid 中添加数据将所有 TStringGrid 数据保存到 json。 需要一些例子。 谢谢。 ...

在 C++ Builder 64 位项目、Rad Studio 10.4 中调试 PAS 文件

[英]Debugging PAS files in C++ Builder 64 bit project, Rad Studio 10.4

我在 c++ builder 32 位项目中找到了这个非常好的单步执行 .pas 文件的链接Using Delphi library with C++ Builder 这适用于 32 位项目，但无法在 64 位应用程序中调试 pas 文件。 是否需要额外的步骤才能在 64 位应用程序中启用要调试的 ...

如何区分delphi中的空字符串和无值

[英]How to differentiate empty string from no value in delphi

我在这个问题中看到： Empty string becomes null when passed from Delphi to C# as a function argument that Delphi's empty string value in reality is just a null-p ...