📄 sesytem.dpr
字号:
program SESytem;
uses
Forms,
SysUtils,
Windows,
SESytemMDI in 'SESytemMDI.pas' {SESystemMDIForm},
Balance in 'Balance.pas' {BalanceForm},
Analog in 'Analog.pas' {AnalogForm},
Improve in 'Improve.pas' {ImproveForm},
New in 'New.pas' {NewForm},
Flash in 'Flash.pas' {FlashForm},
About in 'About.pas' {AboutForm},
Gas in 'Gas.pas' {GasForm},
InHeat in 'InHeat.pas' {InHeatForm},
OutHeat in 'OutHeat.pas' {OutHeatForm},
Regenerator in 'Regenerator.pas' {RegeneratorForm},
Operation in 'Operation.pas' {OperationForm},
Burning in 'Burning.pas' {BurningForm},
Declare in 'Declare.pas',
DisplayBalance in 'DisplayBalance.pas' {DisplayBalanceForm},
AnalogSet in 'AnalogSet.pas' {AnalogSetForm},
DisplayAnalog in 'DisplayAnalog.pas' {DisplayAnalogForm};
var tempform:TFlashForm;
{$R *.res}
begin
Application.Initialize;
tempform:=TFlashForm.Create(nil);
tempform.Show;
tempform.Update;
Sleep(3000);
Application.HelpFile := 'I:\MySelf\SESytem\hlp\SESYSTEM.HLP';
Application.Title := 'SESystem节能模拟系统';
Application.CreateForm(TSESystemMDIForm, SESystemMDIForm);
Application.CreateForm(TNewForm, NewForm);
Application.CreateForm(TAboutForm, AboutForm);
Application.CreateForm(TGasForm, GasForm);
Application.CreateForm(TInHeatForm, InHeatForm);
Application.CreateForm(TOutHeatForm, OutHeatForm);
Application.CreateForm(TRegeneratorForm, RegeneratorForm);
Application.CreateForm(TOperationForm, OperationForm);
Application.CreateForm(TBurningForm, BurningForm);
Application.CreateForm(TDisplayBalanceForm, DisplayBalanceForm);
Application.CreateForm(TAnalogSetForm, AnalogSetForm);
Application.CreateForm(TDisplayAnalogForm, DisplayAnalogForm);
tempform.Free;
Application.Run;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -