Create a copyright window before the main window is displayed

In the project document select File->new form to create a new window, design the appearance of the window.

Name the window as AboutBox, and the source file is named AboutBox.Cpp

Select Project->options to remove the newly created window from automatic setup.

Select View->project Source, open the project file, and add a sentence below.

#include "AboutBox.h"
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
DWORD lTime;
try
{
Application->Initialize();
AboutBox=new TAboutBox(AboutBox);
AboutBox->Show();
AboutBox->Update();
lTime=GetTickCount();
Application->CreateForm(__classid(TMainForm), &MainForm);
while((GetTickCount()-lTime) / 1000 <3);
AboutBox->Hide();
AboutBox->Free();
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}