给定一个这样的类:
TIntClass = class
private
myInts : TList<Integer>;
...
end;
如何使用 [] 运算符访问内部列表的元素,例如
myIntList = TIntClass.Create();
myIntList[5];
?
提前致谢。
最佳答案
如果我理解正确,您需要定义一个私有(private)函数,它将充当默认属性的“getter”:
注意:代码未经测试
type
TIntClass = class
private
// returns a value from myInts based on Index parameter
function getItem(Index: Integer): Integer;
private
myInts : TList<Integer>;
...
public
property Items[Index: Integer]: Integer read getItem; default;
end;
...
implementation
function TIntClass.getItem(Index: Integer): Integer;
begin
Result := myInts[Index];
end;
所以现在你可以这样做:
procedure test;
var
LMyIntClass: TIntClass;
L5thElemValue: Integer;
begin
L5thElemValue := LMyIntClass[4]; // first element is accessed using LMyIntClass[0]
end;
关于arrays - 访问内部数组的元素,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/11491308/