如下类方法
function TDataForm.Add(sName,sValue: string): IFormItem;
var
xmlItem: IXmlNode;
fi: TFormItem;
begin
xmlItem := xmlDoc.CreateElement(sName,'');
xmlItem.Text := sValue;
self.FXmlEle.ChildNodes.Add(xmlItem); fi := TFormItem.CreateInstance(xmlItem);
result := (fi as IFormItem); //出错
end;结果出错,怎么解决,请指点
function TDataForm.Add(sName,sValue: string): IFormItem;
var
xmlItem: IXmlNode;
fi: TFormItem;
begin
xmlItem := xmlDoc.CreateElement(sName,'');
xmlItem.Text := sValue;
self.FXmlEle.ChildNodes.Add(xmlItem); fi := TFormItem.CreateInstance(xmlItem);
result := (fi as IFormItem); //出错
end;结果出错,怎么解决,请指点
强制转换