📄 mainform.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Mainform.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{ //使用缺省浏览器打开指定网页
if(this->Edit1->Text.Length()<1)
return;
HKEY hKeyRoot,hKeySub;
char ValueName[MAX_PATH];
unsigned char DataValue[MAX_PATH];
unsigned long cbValueName=MAX_PATH;
unsigned long cbDataValue=MAX_PATH;
char IE[MAX_PATH];
DWORD dwType;
//打开根键
if(RegOpenKey(HKEY_CLASSES_ROOT,NULL,&hKeyRoot)==ERROR_SUCCESS)
{//打开子键
if(RegOpenKeyEx(hKeyRoot,"htmlfile\\shell\\open\\command",0,KEY_ALL_ACCESS,&hKeySub)==ERROR_SUCCESS)
{//获取默认浏览器命令行
RegEnumValue(hKeySub, 0, ValueName, &cbValueName, NULL,&dwType,DataValue, &cbDataValue);
strcpy(IE,(char *)DataValue);
strcat(IE,this->Edit1->Text.c_str());
//启动浏览器
WinExec(IE,SW_SHOW);
}
else
MessageBox(Handle,"浏览器打开错误!","信息提示",MB_OK);
}
else
MessageBox(Handle,"浏览器打开错误!","信息提示",MB_OK);
//关闭注册表
RegCloseKey(hKeySub);
RegCloseKey(hKeyRoot);
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -