问题标签 [delphi-10-seattle]
For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.
delphi - 使用 Delphi 10 编译 SelectDirectory 第三次重载
为什么编译不出来?看起来很简单,但我不明白......是字符串数组的问题吗?错误是:
这是代码:
delphi - Delphi 10 Seattle 更改为 Win32 GetPath 和冗余 TPoint 和 _POINTL 记录类型
我正在尝试将一些在 Delphi XE8 中工作的代码移植到 Delphi 10 Seattle。此代码调用 Winapi.Windows 中的 GetPath 函数。
新的 Win32 API 函数签名是:
在 XE8 中,以前该函数具有“var Points,Types”,通常称为“var untyped”参数。
修复代码以与 Delphi 10 Seattle 一起工作意味着“统一”应用程序代码中的任意类型以准确使用单元本身中声明的类型。然而令我困惑的是,有两种类型,PPointL 和 TPoint,当我让 GetPath 函数工作时,它填充的数据被填充到一个 _POINTL 记录数组中,在 Winapi.Windows 中如此声明:
但是,还有另一种类型 TPoint,在 System.Types 中声明:
在其他地方,对于 32 位和 64 位 Windows,FixedInt 都别名为 Longint,因此至少在 Windows 平台上,据我所知,TPoint 和 _POINTL 是等效的。
如果现有的应用程序组件代码都使用名为 TPoint 的类型,如下所示:
...我对 Delphi 10 中 RTL 源内部的实际情况有什么意义?我应该如何解决这个问题?在单元级别将 TPoint 别名为 _POINTL?
我该如何解决这个问题并继续?由于此代码是一个商业组件,我想我会等到供应商解决这个问题,但是,我认为理解 RTL 中的 _POINTL 和 TPoint,以及为什么这些结构在定义中是冗余/重复的,会有所帮助其他人将低级 Win32 代码从 Delphi XE8 移植到 Delphi 10 Seattle。
更新:作为一种解决方法,我发现我可以重新声明函数 GetPath 的导入,并让它在我自己的私有单元实现区域导入中保持为 var untyped,然后继续:
multithreading - 如何将数据存储在 TTask 实例中以备后用?
我的目标是在运行之前将一些数据(TValue)存储在 TTask 实例中,然后在任务中使用它。我想使用匿名处理程序而不是 TNotifyEvent 处理程序。
像这样的东西:
然后像这样使用它:
因此可以通过Task的实例访问数据。
我正在考虑从 TTask 继承,但这很棘手,可能不是最佳选择。
有没有其他方法可以使用 RTTI 或其他方式将数据存储到 TTask 中?
我使用 Delphi 10 西雅图。
sql-server - 无法在 mORMot 中正确设置 SQL Server 连接
我尝试设置与 SQL Server 的连接并捕获错误
错误信息:
项目 app_.exe 引发异常类异常,并带有消息“类 {3E9B315B-F456-4175-A864-B2573C4A2101} 的对象工厂丢失。要注册它,您可以将组件 [TFDPhysXXXDriverLink] 拖放到您的项目中。
连接到 SQL Server 并公开 REST 服务的正确方法是什么?
delphi - 如何在 Delphi 10 Seattle 中设置默认系统样式?
我正在尝试将一些在 Delphi XE8 中工作的代码移植到 Delphi 10 Seattle。
这段代码设置了我程序的默认系统样式,但是在 Delphi 10 Seattle 中不存在 SetSystemStyle 方法。
delphi - 比较 AnsiString 的最快方法
检查 AnsiString 是否等于其他 AnsiString 的最快方法是什么?
目前我这样做是为了检查字符串是否相等:
还有什么是检查一个 AnsiString 是否包含另一个 AnsiString(不完整检查)的最快方法?
为此,我正在使用:
delphi - dccosx 致命错误
我想在 Rad Studio Seattle 下编译我的 Rad Studio XE8 Delphi 项目。
为 Win32 和 Win64 平台编译是成功的。但是当我尝试用 OSX 编译项目时,总是出现编译错误:
[dccosx 致命错误] F2084 内部错误:AV0CAF8963-R00000014-0
如果我尝试用一个简单的 TButton 编译一个新的多设备应用程序,我也会得到相同的编译错误。
listview - 在 RAD Studio 10 Seattle 中,我的 ListViews 的属性“.Text”和“.Detail”带有下划线作为错误。我该如何解决?
我刚刚下载了 RAD Studio 10 Seattle 并打开了我在 RAD Studio XE8 中开发的程序。在 XE8 中,我的程序绝对没有错误。但是,当我在 10 Seattle 打开程序并尝试运行它时,它给了我大约 60 个错误。我查看了我的代码,“listview.items.item[].text”和“listview.items.item[].detail”的所有实例都加了下划线。当我查看“listview.items.item[]”的可能属性时,“.text”和“.detail”都不存在。你如何解决/解决这个问题?
在此先感谢,乔治。