Victor example of a serial port control packets as a child form is added to the parent window times-CodePudding

Victor Example of a serial port control packets folder SendFile run separately when there is no problem, but when use the Project | Add to another Form1 Porject command to Add it to the operation error,
Is preset by ordering a Button in the Form1 will SendFile as child form calls, including the Button function is written so TForm,

 void __fastcall TForm1: : ButtonSendFileClick (TObject * Sender) 
{
TFormSendFile * FormSendFile=new TFormSendFile (this); 
FormSendFile - & gt; ShowModal (); 
The delete FormSendFile; 
}

Description:
1. SendFile. H has been added to the header file of Form1,
2. Has been set to

3. Include the Path has been included in the SendFile in the folder

An error is as follows:

Three mistakes respectively corresponding to the above three lines

UnitSendFile. H complete code is as follows:

//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
//serial port control demo program, Copyright (C) Victor Chen 

# # ifndef UnitSendFileH 
# define UnitSendFileH 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
#include  
#include  
#include  
#include  
#include  
#include  
# include "VictorFSM. H" 
# include "YbCommDevice. H" 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
The class TFormSendFile: public TForm 
{
__published://IDE - managed Components 
TYbCommDevice * YbCommDevice1; 
TButton * ButtonSend; 
TProgressBar * ProgressBar1; 
TMemo * Memo1; 
TButton * ButtonSet; 
TVictorFSM * VictorFSM1; 
TOpenDialog * OpenDialog1; 
Void __fastcall YbCommDevice1Package (TObject * Sender, int NotifyType); 
Void __fastcall ButtonSetClick (TObject * Sender); 
Void __fastcall VictorFSM1ProcessState (TObject * Sender); 
Void __fastcall ButtonSendClick (TObject * Sender); 
Private://User declarations 
AnsiString _sReceivePath; 
HANDLE _hSendFile _hReceiveFile; 
Void __fastcall ShowInfo AnsiString (s); 

Unsigned char _ucPkgID; 
Unsigned char _ucTryTimes; 
Long _lBytesToReceive; 
TDateTime _dtReceiveFileTime; 

AnsiString _sUploadFileName; 
Long _lUploadDataPos, _lUploadDataSize _lUploadFileSize; 
TVictorFsmStateT _bReceivingFile; 

Void ReceivePackage (TMyFinfoPkg & amp; Finfo); 
Void ReceivePackage (TMyFdataPkg & amp; Fdata); 
Void ReceivePackage (TMyStatusPkg & amp; Fstatus); 

Void PrepareSendFile (void); 
Void SendFileInfoReq (void); 
Void SendFileInfoWait (void); 
Void SendFileDataReq (void); 
Void SendFileDataWait (void); 
Void SendFileDone (void); 
Public://User declarations 
__fastcall TFormSendFile (TComponent * Owner); 
}; 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Extern PACKAGE TFormSendFile * FormSendFile; 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
# endif

How do I solve