Delphi 10.4.1 与 FireMonkey。
我在 a 上有 50 个项目TListView,ID 从 1 到 50。这里没有发布代码,因为我什至不知道从哪里开始。
如果我搜索 ID=35,有没有办法以
TListView编程方式精确移动到该项目的位置,以便该项目处于完整视图中?
如何让变量指向记录数组?
注意:我想将预定义的 TRecord 数组作为常量......但是在代码中,我需要变量 'W' 来记录要使用的记录数组。
请注意,我不希望使用 TRecord 的构造函数在代码中(动态地)创建 TRecord 数组,但希望拥有静态数组(因为数据不会改变)。
如何让变量“W”“记录”哪个 TRecord 数组?
请参阅下面的代码 - 更容易理解我的意思。
procedure TForm1.Button1Click(Sender: TObject);
type
TTestRec = record
X: string;
Y: Integer;
end;
TMyArr = TArray<TTestRec>;
const
ARRAY_A : TArray<string> = ['A1', 'A2', 'A3', 'A4'];
ARRAY_B : TArray<string> = ['B1', 'B2', 'B3'];
ARRAY_C : array[1..2] of TTestRec = (
(X: 'testC1'; Y:1),
(X: 'testC2'; Y:2)
);
ARRAY_D : array[1..3] of TTestRec = (
(X: 'testD1'; Y:3),
(X: 'testD2'; Y:4)
(X: 'testD3'; Y:9)
);
var …Run Code Online (Sandbox Code Playgroud) 运行 11.1 时,我TGPUObjectsPool在 Windows 64 位(发布模式)下关闭简单的基本 FMX 2D 应用程序时遇到此错误。我第一次看到这个错误。
ReportMemoryLeaksOnShutdown := True仅使用in运行空白表单会project.dpr导致关闭时出现此错误。
TForm 上没有任何组件。只需运行并关闭即可。这让我想知道如果一个基本的空项目可以因这种内存泄漏而关闭,那么 Delphi 版本会进行什么样的 QA。
有什么解决方案可以消除这个错误吗?
---------------------------
Unexpected Memory Leak
---------------------------
An unexpected memory leak has occurred. The unexpected small block leaks are:
9 - 24 bytes: TGPUObjectsPool x 1
89 - 104 bytes: TObjectDictionary<System.TClass,System.Generics.Collections.TObjectList<FMX.TextLayout.GPU.TReusableObject>> x 1
Run Code Online (Sandbox Code Playgroud) 是否可以TProc<T>允许 aValue 不仅可以读取,还可以在TProc匿名程序中进行编辑?
var xProc2: TProc<Integer>;
xProc2 := procedure(aValue: Integer)
begin
aValue := 5;
end;
Run Code Online (Sandbox Code Playgroud)
德尔福 10.4.x