Delphi 有如下代码
执行Button1Click 过程 提示 :
出错:Ordinal type requried
--------------------------------
错误发生在 方法定义的时候
应修改为:
注意,在Type中声明的叫Dynamic Array,而在函数中的叫Open Array。两者类型不兼容
type
Ta=array of string;
var
Form1: TForm1;
b:ta;
procedure func(a:ta);
implementation
{$R *.dfm}
procedure func(a:ta);
begin
showmessage(a[1]);
b:=a;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
func(['123','asd']);
end;
执行Button1Click 过程 提示 :
出错:Ordinal type requried
--------------------------------
错误发生在 方法定义的时候
procedure func(a:ta);
应修改为:
procedure func(a:array of string);
注意,在Type中声明的叫Dynamic Array,而在函数中的叫Open Array。两者类型不兼容