一个关于overload和override的语法问题

Question

type 
  TForm1 = class
  public
    constructor Create(TableName:string); overload; 
  end;提示警告：
Method 'Create' hides virtual method of base type 'TCustomForm'怎样消除该警告？用override,overload,virtual,abstract等都不行

Answer 1

reintroduce和override两个都加行不行？

Answer 2

constructor CreateForm(TableName:string);

Answer 3

overload就是覆盖,出现这个警告很正常.
应该用override,而且你的原型不正确.

Answer 4

没找到你的那个函数原型,sorry
下面这个不知道对你是否有用.呵呵，肯定没有错误信息.
procedure CreateWnd; override;
implementation
procedure TForm1.CreateWnd;
begin
//
end;

Answer 5

怎么是  TForm1 = class？
    constructor Create(TableName:string);reintroduce;可以啊

Answer 6

type 
  TForm1 = class(TForm)
  public
    constructor MyCreate(TableName:string); 
  end;

Answer 7

找到了,是 TCustomForm.Create(AOwner: TComponent);
哈哈,给分吧.
constructor Create(AOwner: TComponent);override;
implementation{$R *.dfm}
Constructor TForm1.Create(AOwner: TComponent);
begin
//
end;

Answer 8

constructor Create(TableName:string); reintroduce;overload;

Answer 9

好奇怪!
constructor Create(AOwner: TComponent);reintroduce;overload;
Constructor TForm1.Create(AOwner: TComponent);
begin
//
inherited;
showmessage('Create');
end;
根本不执行showmessage,如果是override就可以.

Answer 10

如果父类的方法是虚拟的，那么在子类中重载该方法时应该加上reintroduce修饰字，否则会出现编译警告：“hides virtual method of base type”。当然只是编译时产生警告，如果你不顾它的警告，坚持不加修饰字，对程序运行结果也不会造成影响。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 11

更准确的说，如果父类的方法是虚拟（virtual）的或者动态（dynamic）的(当然它同时也可一是抽象（abstract）的)，都会有这个问题。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 12

更准确的说，如果父类的方法是虚拟（virtual）的或者动态（dynamic）的(当然它同时也可一是抽象（abstract）的)，都会有这个问题。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 13

呵呵，就是 lxpbuaa说的reintroduce。
不加也没有关系，但是看到有警告出现心里不舒服。