在主窗体中写了一个自定义类,不是VCL控件,结果每次保存或编译都会出现does not have a corresponding component报警提示,但程序能正常运行,这个提示很烦,而且点确定,还会自动把你定义的类删掉。TMyForm = class(TForm)
private
MyClass : TMyClass;自己定义的类,不是VCL组件类。
private
MyClass : TMyClass;自己定义的类,不是VCL组件类。
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end; {自定义的 TMyList 类}
TMyList = class(TObject) end;
var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
var
myList: TMyList; {声明一个 TMyList 类的变量}
begin
myList := TMyList.Create;
ShowMessage(myList.ClassName); {TMyList}
myList.Free;
end;end.