程序1 program E1; uses Forms,Dialogs,SysUtils, EndM1 in 'EndM1.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm2, Form2); then begin ShowMessage('缺少参数:'+Inttostr(ParamCount)); Application.Terminate; Exit; end; //在运行时去…