访问没有名称的过程参数

时间:2018-06-06 14:28:08

标签: delphi arguments delphi-10.2-tokyo

甚至不确定这是否可行,但我想我会问蜂巢。

在Delphi中,我知道可以循环遍历表单的组件数组,间接访问组件'如果您不知道他们的名字(例如,在运行时创建的组件)。

过程/函数的参数是否可以使用相同的原理?

基本上,我必须重构很多代码来记录传递给过程的值,并且我试图找到一种方法来编写可以复制/粘贴到方法中的泛型,如果参数不需要更新列出更改。

例如,这些内容如下:

procedure SomeProcedure(a, b, c:String; i, j, k:Integer);
var
     loopCounter:integer;
begin
     for loopCounter:=low(METHOD_ARGUMENTS???) to high(METHOD_ARGUMENTS???) do
     begin
          log.add(METHOD_ARGUMENTS[loopCounter].name, METHOD_ARGUMENTS[loopCounter].value);
     end;//for
end;//SomeProcedure

其中METHOD_ARGUMENTS是'对象'使用传入的参数列表访问。

就像我说的那样,甚至不确定这是否是一件事 - 但这肯定会让生活变得更轻松。

提前致谢!

0 个答案:

没有答案