
[英]Indy 9 to Indy 10 conversion
我在 inte.net 上找到了一个旧的.dpr文件,该文件基本上是一个 Delphi 7 项目,从 2008 年开始,关于一个旧游戏的服务器模拟。 我尝试使用 RAD Studio 编译该文件,但该文件似乎使用的是 Indy 9 units/libs,其中 RAD Studio 附带的可用 Ind ...
[英]Indy 9 to Indy 10 conversion
我在 inte.net 上找到了一个旧的.dpr文件,该文件基本上是一个 Delphi 7 项目,从 2008 年开始,关于一个旧游戏的服务器模拟。 我尝试使用 RAD Studio 编译该文件,但该文件似乎使用的是 Indy 9 units/libs,其中 RAD Studio 附带的可用 Ind ...
[英]How to use android emulator with delphi Alexandria
随着新的 android 13 现在有一些关于接收通知所需的权限的新修改(arrgh。),而不是一直购买新手机? 我很好奇是否有办法启动模拟器来测试新功能? 有人知道我如何使用 android 13 运行模拟器,这样我就可以尝试我的应用程序(用 delphi 制作)如果它在 android 13 上 ...
[英]Test if a Pointer is a TObject instance
我正在尝试使用 Delphi RTTI 编写一些通用调试代码。 我遇到的问题是我正在检查只包含指针的 TList 的内容。 现在我从我的代码中知道这些指针实际上是 TObject 引用(或某些后代)。 所以我的问题是:给定一个有效的 Pointer 是否有一种安全的方法来确定它是否实际上是一个 TO ...
[英]How to detect if user selected .txt file is Unicode/UTF-8 format and Convert to ANSI
我的非 Unicode Delphi 7 应用程序允许用户打开 .txt 文件。 有时尝试打开 UTF-8/UNICODE.txt 文件会导致问题。 我需要一个 function 来检测用户是否正在打开带有 UTF-8 或 Unicode 编码的 txt 文件,并在可能的情况下自动将其转换为系统的 ...
[英]Delphi THttpClient: post's IHttpResponse giving encoded string seen in fiddler webview
我有一个THTTPClient在调用lHttpResp.ContentAsString() 。 字符串如下所示:㰀㼀砀猀碗∀∀挀漀最∀唀吀唀吀䘀ⴀ㘀∀∀猀琀愀渀愀渀搀愀氀漀渀漀渀攀㴀攀㴀㼀㸀吀㸀䄀寿伥䄀唀刀栀琀琀瀀瀀猀㨀⼀⼀攀攀⸀⸀琀攀猀琀⸀⸀瀀愀礀瀀愀礀瀀愀礀礀⸀挀漀䠀猀琀伥礀匀礀匀瘀⼀栀 ...
[英]Is writing different TObjects in a TObjectDictionary thread safe?
我正在编写一个与 SQL 服务器通信的应用程序,该服务器在 blob 字段中提供字节数组。 我有一个存储对象的 TObjectDictionary,每个 object 存储起始字节和我需要读取的字节数,并将其转换为所需的数据类型。 TObjectDictionary 中的对象引用不同的 SQL ...
[英]Trying to call function in DLL - translation from C to Delphi
我必须使用 Delphi 访问 DLL,但只有.h文件。 大多数功能都经过翻译并且可以完美运行,但这部分不是:FUNCTION_PRE64 ULONG FUNCTION_PRE OpenModuleEx ( ULONG moduleID, ULONG nr, unsig ...
[英]Array of records (TStringlist based) causing Access Violation
这是我第一次尝试使用记录。 我有 ~180 个带分隔符的文本文件,每个文件有 ~250,000 行。 在每个文件中,最多有 150 个唯一记录,文件的内容被分配给记录的匹配 ID。 iList和sl在 create 和 destroy 的形式上被创建和销毁。 在每个文件 iList 被清除并且R ...
[英]GPU or CPU used for VCL graphics-based commands?
在搜索了有意义的文档之后,虽然以下都是 VCL GRAPHICS 的根目录,但我正在尝试验证 GPU 或 CPU 是否用于以下 VCL 命令(在 Windows 服务器上) PngImage.assign(SomeMemoryStream); PngImage.canvas.TextOut(5 ...
[英]Delphi Game Timer program freezes up after 1.5 to 2 hours and sometimes gives an exception "Canvas does not allow"
我有一个简单的程序,单线程,有一个有控件的主窗体,另一个窗体有 bitmap 和 bitmap 之上的一些 TLabels,有得分,时钟时间,罚时队和周期。 在我的主窗体中,我有一个间隔为 500 毫秒的 TTimer,它在启动时计算时钟和任何惩罚时间,因为它倒计时并更新另一个窗体上的标签。 定时 ...
[英]Custom TListBoxItem Live Bindings Advice
这可能有点啰嗦,但基本上我正在寻找开发新项目的一些指导。 我正在使用 RAD Studio 11,同时使用 Delphi 和 C++ Builder,尽管我在 C++ 方面有更多经验。 以前我一直从 JSON API 下载数据,将 JSON 处理成单独的对象(主要只包含字符串),将这些对象添加到 T ...
[英]How to resize image using Skia4Delphi
我可以使用Skia4Delphi加载和保存图像文件。 这是我的代码: 如何在保存之前将图像调整为定义的大小(宽度和高度)? (德尔福 10.3.3 VCL) ...
[英]Embarcadero Delphi has one version of installed Target Platform, but AndroidManifest.xml has different compile and target SDK versions - why?
我正在使用 Embarcadero Delphi 10.4 进行 Android 移动开发。 我已经在目标平台下安装了 Android SDK 25.2.5 32 和 64 位。 我认为,这是 Delphi 10.4 的默认值 SDK,我没有删除默认值 SDK 并安装了不同的东西。 那也行。 现在 ...
[英]Delphi - Measure execution time per line of an unit
目前我正在研究 Delphi 计算模块 (bpl) 的性能改进。 在过去的几天里,我发现了几行缓慢的代码。 我们将执行时间从 8 分钟缩短到 3 分钟。 我通过在所有单元中添加秒表来发现较慢的代码行,但进行这些更改非常耗时。 结尾; 计算单位为百行。 我希望能够装饰一个单元,找到这些缓慢的代码行。 ...
[英]How to define a default indexed property for a TObject class in Delphi
给定这些课程; 我如何在 TMyClass 上实现属性/函数/枚举器,而不是这个 我可以做这个 我认为这是制作默认属性的问题,但您不能像 function 那样将参数传递给属性。 编辑 07/12。 好的。 因此,如果我将List设置为default; ,我相信这会奏效。 ...
[英]How to speed up UI rendering in Delphi
我使用 TScrollBox 作为列表,使用 TFrame 作为项目,我将在运行时生成帧。 我使用的框架包含一个 3.6KB 的 SVG 图像和一些标签和编辑框。 作为测试,我在 FormShow 中生成了包含 1000 个项目的列表,如下所示: 请注意,我已将框架的 Align 属性设置为 alT ...
[英]Should I raise an exception when getting the size or the position of a file?
我正在尝试在 Delphi 中创建一个 class 来处理文件。 我有一个返回文件大小的属性,另一个返回文件的 position 的属性。 我不知道这些调用是否会发生任何错误。 我应该提出例外吗? 我的代码是: 我不知道调用 GetFileSize 或 SetFilePointer(不移动文件指针 ...
[英]TIdHTTP slow downloads
我使用TIdHTTP下载我的应用程序的更新。 安装文件大约 80 MB。 它有效,但我注意到不知何故,下载速度比直接从谷歌浏览器下载的相同链接慢得多。 为什么会这样? 我应该在TIdHTTP上进行任何设置以加快下载速度吗? 我的代码没什么特别的,我只是像这样使用Get()方法: ...
[英]Android app not running after splash screen
我想就我从 Delphi 版本 10.4 切换到 Alexandria (11.2) 的问题与您联系。 从那时起,我的 Android 应用程序编译和构建没有错误,但在启动画面之后它们不会在 Android 设备上启动,无论 Android 版本如何。 甚至在那些以前没有错误地运行过的系统上也不行。 ...
[英]delete all words with more than 4 letters in a string (Pascal)?
我被分配了一项大学任务,我必须编写一个程序来删除所有超过 4 个字母的单词。 我真的一点头绪都没有。 我将非常感谢任何形式的帮助。 我试过了。 它在 onlinegdb 上工作,但不在 Delphi 上工作……我不知道为什么…… ...