Error in module XXXX:Declaration of class TForm1 is missing or incorrect!

版权声明：本文为博主原创文章，未经博主允许不得转载。 https://blog.csdn.net/johnlaoxing/article/details/78214546

正常情况下：

在Delphi或者C++builder新建窗体的时候你可以先通过窗体属性的name属性设置窗体名称，同时，类名就自动生成了只是在name名签加了一个T，通过保存来确定文件的名称。

但是如果出现题目中的报错情况，不要慌，出错原因就是*.dfm文件和你的窗体类的名称不一致造成的。 只要更改好名称就可以了。

Demo：

//About.h

#ifndef AboutH
#define AboutH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TFrmAbout : public TForm
{
__published: // IDE-managed Components
    TImage *Image1;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label3;
private: // User declarations
public:  // User declarations
    __fastcall TFrmAbout(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFrmAbout *frmAbout;
//---------------------------------------------------------------------------
#endif

#ifndef AboutH
#define AboutH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TFrmAbout : public TForm
{
__published: // IDE-managed Components
    TImage *Image1;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label3;
private: // User declarations
public:  // User declarations
    __fastcall TFrmAbout(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFrmAbout *frmAbout;
//---------------------------------------------------------------------------
#endif

//*.dfm文件

object frmAbout: TfrmAbout                   //注意到此时的TfrmAbout和以上的TFrmAbout不一样就会出现报错，此时要更改为TFrmABout就可以了。
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = 'frmAbout'
  ClientHeight = 364
  ClientWidth = 445
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13