小编meh*_*aya的帖子

我试图将一些字符串传递给动态字符串数组,在这种情况下它正在工作:

procedure DoSomeThing(in_cmd: string; var out_strs: array of string);
begin
  ..
  for n := low(out_strs) to high(out_strs) do
    begin
      out_strs[n] :='bla bla';
    end;
end;

在应用程序中使用as:

.
.
.
SetLength(my_out_str, sizer);

DoSomeThing('do it now', my_out_str);
.
.

但我想在程序中使用my_out_str的SetLength.可能吗？