定义一个Tobjectlist变量,Myobjectlist
在Myobjectlist中添加一个类对象,Myobjectlist.Add(myclass)
能不能这样来调用那个类对象的属性和方法呀Myobjectlist.Items[i].name呀什么的,各种属性和方法呀?我这样弄老是出错呀,显示后面的各种属性呀,方法呀未定义.

解决方案 »

  1.   

    tt := TObjectList.Create(false); // 不让objectlist管理对象,即可解决你的问题.还未看懂里面的那个notify过程.
    procedure TObjectList.Notify(Ptr: Pointer; Action: TListNotification);
    begin
      if OwnsObjects then
        if Action = lnDeleted then
          TObject(Ptr).Free; // 这个地址是存在的,但这里释放就出错,我也很想知道原因.
      inherited Notify(Ptr, Action);
    end;
      

  2.   

    要加上强制类型转换 TYourObjectType(Myobjectlist.Items[i]).YourProc('哈哈');
     TYourObjectType(Myobjectlist.Items[i]).YourProperty:='你好可爱';