没有关系,这是D6新的特征。说明了EStackOverflow已经陈旧了,不要使用了。
{$WARNINGS OFF}
会消除这个问题,或者不要使用这个对象。

解决方案 »

  1.   

    太好了,chechy也在线![Warning] framBrowWzdj.pas(20): Method 'Create' hides virtual method of base type 'TCustomFrame'
    加了这句,是否所有的警告都消失。
    附加问题: 
    问题1:
    [Warning] framBrowWzdj.pas(20): Method 'Create' hides virtual method of base type 'TCustomFrame'
    这个警告有无影响?
    问题2:
    怎样传递一个“对象”
    var newObj:Tobject;    // 一个对象,用来接受赋值
                              如newObj:=sender;  但我不知行不行...procedure proc1 
    begin
      newObj:= frmDataBrow_wz.frm_DataBrow_WZ.DBGrid1;   // 出错
    end;procedure proc2
    begin
     TDBGrid(newObj).DataSource:='ads_table';    // 举例控制当前dbgrid
     TDBGrid(newObj)......
    end;
    我这个思路可否?我的分全给你,谢谢!
      

  2.   

    1、应该所有的警告都消失了。
    消除这个warning,用reintroduce的关键字。
    constructor Create; reintroduce;
    2、代码应该可以。TObject可以接受任何Class的Instance,这是面向对象的特征。