将项添加到数组的其他方法

Question

有没有办法用类似的东西填充Delphi数组

array = array('this','that','and uh'); // php
array = ['this','that','and uh']; // javascript

或者,如果没有,也许你可以给我一个关于我正在尝试做什么的提示:
我有这个TButton数组.我在数组中添加了一些按钮,这些按钮应该对用户可见.使用这种数组方法,我可以轻松地使用循环来设置其可见性属性.

Answer 1

使用动态数组和适当的Delphi现代版本,您可以使用数组构造函数.

myArray := TArray<string>.Create('this', 'that', 'and uh');

如果你想创建一个按钮数组,那么它是这样编写的:

buttons := TArray<TButton>.Create(btn1, btn2, btn3);

然后迭代按钮数组:

for button in buttons do
  DoSomething(button);

Answer 2

我不确定它引入了什么版本,但在最近的Delphi版本中,你已经能够使用这样的替代语法:

type
  TStringArray = array of string;

procedure Test;
var stringArray: TStringArray;
begin
  stringArray := TStringArray.Create('this','that','and uh');
end;