?? niumag.dpr
字號:
program NIUMAG;
uses
Forms,
Controls,
SysUtils,
Dialogs,
Unt1Main in 'Unt1Main.pas' {Frm1Main},
Unit7 in 'Unit7.pas',
Untbd2 in 'Untbd2.pas' {Frmbd2},
Unttest1 in 'Unttest1.pas' {Frmtest1},
Untchaxun in 'Untchaxun.pas' {FrmChaXun},
Unit6 in 'Unit6.pas' {Form6},
ABOUT in 'ABOUT.pas' {Frmabout};
{$R *.res}
Var
/// Hwnd:Thandle;
Form6Tmp:TForm6;
time1:TDateTime;
begin
Form6Tmp:=TForm6.create(Application);
Form6Tmp.Show;
Form6Tmp.refresh;
time1:=now;
repeat
until time1+StrtoTime('00:00:1')<=now; //延時5秒
Form6Tmp.free;
Application.Initialize;
// FrmLogin := TFrmLogin.Create(Application);
// FrmLogin.ShowModal;
/// if FrmLogin.ModalResult = mrok then
// begin
Application.Title := '紐邁快速小核磁含油量分析儀-上海紐邁電子科技有限公司';
Application.CreateForm(TFrm1Main, Frm1Main);
Application.CreateForm(TFrmbd2, Frmbd2);
Application.CreateForm(TFrmtest1, Frmtest1);
Application.CreateForm(TFrmChaXun, FrmChaXun);
Application.CreateForm(TFrmabout, Frmabout);
Application.Run;
//end
// else
// begin
// Application.Terminate;
// end;
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -