📄 unit1.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
String NewFileName;
int i;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N2Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd1_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N10Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd2_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N11Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd2_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N12Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd2_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N13Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd2_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N15Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd3_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N16Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd3_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N17Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd3_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N18Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd3_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N14Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd4_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N19Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd4_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N20Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd4_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N21Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd4_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N22Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd5_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N23Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd5_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N24Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd5_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N25Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd5_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N26Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd6_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N27Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd6_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N28Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd6_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N29Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd6_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N33Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd8_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N34Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd8_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N35Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd8_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N36Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"cd8_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N30Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"ch7_1p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N31Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"ch7_2p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N32Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"ch7_4p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N37Click(TObject *Sender)
{
NewFileName=ExtractFilePath(Application->ExeName)+"ch7_3p.exe";
i=WinExec(NewFileName.c_str(),SW_SHOWNORMAL);
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -