?? avsmake.dpr
字號:
program avsmake;
uses
Forms,windows,Dialogs,
Unit1 in 'Unit1.pas' {MainForm},
Unit2 in 'Unit2.pas' {MoveForm};
{$R *.res}
begin
Application.Initialize;
if FindWindow('TMainForm', nil)=0 then
begin
Application.Title := 'AVS 生成器';
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TMoveForm, MoveForm);
Application.Run;
end
else
Application.MessageBox('不能二次運(yùn)行','警告',MB_OK);
//設(shè)置應(yīng)用程序激活 SetActiveWindow(H);
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -