如何创建控件数组属性(100分)

我想在一个TForm2 单元中加入一个TProcessPanel数组属性，实现如下：
private
function GetOperation(const AIndex:Integer):TProcessPanel;
procedure SetOperation(Value:TProcessPanel;const AIndex:Integer);
public
property Operation[const AIndex:Integer]:TProcessPanel read GetOperation write SetOperation;
function TForm2.GetOperation(const AIndex:Integer):TProcessPanel;
begin
if (AIndex<0) or (AIndex>20) then
raise Exception.Create('wrong planet number')
else
Result:=Operation[AIndex];
end;
procedure TForm2.SetOperation(Value:TProcessPanel;Const AIndex:Integer);
begin
if (AIndex<0) or (AIndex>20) then
raise Exception.Create('wrong planet number')
else
Operation[AIndex].assign(Value);
end;
运行时出现imcompaptible types 是何原因？

你的 SetOperation 的参数应该这样：
procedure SetOperation(AIndex:Integer;const Value:TProcessPanel);
参数顺序反了。

接受答案了.