内存篇

来源:互联网 发布:字典转json 去掉制表符 编辑:程序博客网 时间:2024/05/18 20:11

// TestDlg.cpp : 实现文件
//

#include "stdafx.h"
#include "Test.h"
#include "TestDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// 用于应用程序“关于”菜单项的 CAboutDlg 对话框

class CAboutDlg : public CDialog
{
public:
 CAboutDlg();

// 对话框数据
 enum { IDD = IDD_ABOUTBOX };

 protected:
 virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV 支持

// 实现
protected:
 DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
 CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()


// CTestDlg 对话框

 

CTestDlg::CTestDlg(CWnd* pParent /*=NULL*/)
 : CDialog(CTestDlg::IDD, pParent)
{
 m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CTestDlg::DoDataExchange(CDataExchange* pDX)
{
 CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CTestDlg, CDialog)
 ON_WM_SYSCOMMAND()
 ON_WM_PAINT()
 ON_WM_QUERYDRAGICON()
 //}}AFX_MSG_MAP
 ON_BN_CLICKED(IDC_BTNHIDE, OnBnClickedBtnhide)
 ON_BN_CLICKED(IDC_BTNTYPE, OnBnClickedBtntype)
 ON_BN_CLICKED(IDC_BTNAUTOPLAY, OnBnClickedBtnautoplay)
 ON_BN_CLICKED(IDC_BTNPLAYPROGRAM, OnBnClickedBtnplayprogram)
 ON_BN_CLICKED(IDC_BTNOPENCLOSE, OnBnClickedBtnopenclose)
 ON_BN_CLICKED(IDC_BTNMEMORY, OnBnClickedBtnmemory)
 ON_BN_CLICKED(IDC_BUTTON2, OnBnClickedButton2)
END_MESSAGE_MAP()


// CTestDlg 消息处理程序

BOOL CTestDlg::OnInitDialog()
{
 CDialog::OnInitDialog();

 // 将/“关于.../”菜单项添加到系统菜单中。

 // IDM_ABOUTBOX 必须在系统命令范围内。
 ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
 ASSERT(IDM_ABOUTBOX < 0xF000);

 CMenu* pSysMenu = GetSystemMenu(FALSE);
 if (pSysMenu != NULL)
 {
  CString strAboutMenu;
  strAboutMenu.LoadString(IDS_ABOUTBOX);
  if (!strAboutMenu.IsEmpty())
  {
   pSysMenu->AppendMenu(MF_SEPARATOR);
   pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
  }
 }

 // 设置此对话框的图标。当应用程序主窗口不是对话框时,框架将自动
 //  执行此操作
 SetIcon(m_hIcon, TRUE);   // 设置大图标
 SetIcon(m_hIcon, FALSE);  // 设置小图标

 // TODO:在此添加额外的初始化代码
 
 return TRUE;  // 除非设置了控件的焦点,否则返回 TRUE
}

void CTestDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
 if ((nID & 0xFFF0) == IDM_ABOUTBOX)
 {
  CAboutDlg dlgAbout;
  dlgAbout.DoModal();
 }
 else
 {
  CDialog::OnSysCommand(nID, lParam);
 }
}

// 如果向对话框添加最小化按钮,则需要下面的代码
//  来绘制该图标。对于使用文档/视图模型的 MFC 应用程序,
//  这将由框架自动完成。

void CTestDlg::OnPaint()
{
 if (IsIconic())
 {
  CPaintDC dc(this); // 用于绘制的设备上下文

  SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

  // 使图标在工作矩形中居中
  int cxIcon = GetSystemMetrics(SM_CXICON);
  int cyIcon = GetSystemMetrics(SM_CYICON);
  CRect rect;
  GetClientRect(&rect);
  int x = (rect.Width() - cxIcon + 1) / 2;
  int y = (rect.Height() - cyIcon + 1) / 2;

  // 绘制图标
  dc.DrawIcon(x, y, m_hIcon);
 }
 else
 {
  CDialog::OnPaint();
 }
}

//当用户拖动最小化窗口时系统调用此函数取得光标显示。
HCURSOR CTestDlg::OnQueryDragIcon()
{
 return static_cast<HCURSOR>(m_hIcon);
}

void CTestDlg::OnBnClickedBtnhide()
{
 HKEY hKey;
 LPCTSTR KeyValue="NoDrives";
 DWORD Value=4;
 LPCTSTR StrKey="Software//Microsoft//Windows//CurrentVersion//Policies//Explorer";
 if (ERROR_SUCCESS==::RegOpenKeyEx(HKEY_CURRENT_USER,StrKey,NULL,KEY_ALL_ACCESS,&hKey))
 {
  if (ERROR_SUCCESS==::RegSetValueEx(hKey,(LPCTSTR)KeyValue,0,REG_BINARY,(BYTE *)&Value,sizeof(Value)))
   MessageBox("请注销计算机,查看设置结果","信息提示",MB_OK);
  ::RegCloseKey(hKey);
 }
}

void CTestDlg::OnBnClickedBtntype()
{
 CString StrDisktype;
 switch( ::GetDriveType("G:") )
 {
  case DRIVE_REMOVABLE:
   StrDisktype="软驱";
   break;
  case DRIVE_FIXED:
   StrDisktype="固定硬盘";
   break;
  case DRIVE_REMOTE:
   StrDisktype="网络驱动器";
   break;
  case DRIVE_CDROM:
   StrDisktype="光驱";
   break;
  case DRIVE_RAMDISK:
   StrDisktype="RAM驱动器";
   break;
  default:
   StrDisktype="未知";
   break;
 } 
 MessageBox("G:盘为:"+StrDisktype,"信息提示",MB_OK);
}

void CTestDlg::OnBnClickedBtnautoplay()
{
 HKEY hKey;
 LPCTSTR KeyValue="AUTORUN";
 //Value值为1表示启用,为0表示禁用
 DWORD Value=1;  
 LPCTSTR StrKey="System//CurrentControlSet//Services//CDRom";
 if (ERROR_SUCCESS==::RegOpenKeyEx(HKEY_LOCAL_MACHINE,StrKey,NULL,KEY_ALL_ACCESS,&hKey))
 {
  if(ERROR_SUCCESS==::RegSetValueEx(hKey,(LPCTSTR)KeyValue,0,REG_DWORD,(BYTE *)&Value,sizeof(Value)))
   MessageBox("请注销计算机,查看设置结果","信息提示",MB_OK);
  ::RegCloseKey(hKey);
 }
}

void CTestDlg::OnBnClickedBtnplayprogram()
{
 CString   StrFilter="可执行程序(*.exe)|*.exe|所有文件(*.*)|*.*||";
 CFileDialog  Dlg(TRUE,NULL,NULL,NULL,StrFilter,this); 
 if(Dlg.DoModal()==IDCANCEL)
  return;
 HKEY hKey;
 LPCTSTR KeyValue="";
 LPCTSTR Value=Dlg.GetPathName()+" %1";
 LPCTSTR StrKey="AudioCD//Shell//Play//Command";
 if (ERROR_SUCCESS==::RegOpenKeyEx(HKEY_CLASSES_ROOT,StrKey,NULL,KEY_ALL_ACCESS,&hKey))
 {
  if (ERROR_SUCCESS==::RegSetValueEx(hKey,(LPCTSTR)KeyValue,0,REG_SZ,(BYTE *)(LPCSTR)Value,strlen(Value)+1))
   MessageBox("请注销计算机,查看设置结果","信息提示",MB_OK);
  ::RegCloseKey(hKey);
 }
}
#include <mmsystem.h>
#include "./testdlg.h"
void CTestDlg::OnBnClickedBtnopenclose()
{
 //关闭光驱
 //::mciSendString("set cdaudio door closed",NULL,0,0); 
 //打开光驱
 ::mciSendString("set cdaudio door open",NULL,0,0); 
}

void CTestDlg::OnBnClickedBtnmemory()
{
 CString StrTotalMemory;
 CString StrUsedMemory;
 CString StrFreeMemory;
 CString StrInfo;
 MEMORYSTATUS MemStat;
 MemStat.dwLength=sizeof(MEMORYSTATUS);
 ::GlobalMemoryStatus(&MemStat);
 StrTotalMemory.Format("系统总内存:%ld字节,大约等于: %ld M Byte/n",MemStat.dwTotalPhys,MemStat.dwTotalPhys/1024/1024);
 StrFreeMemory.Format("系统可用内存:%ld字节,大约等于: %ld M Byte/n",MemStat.dwAvailPhys,MemStat.dwAvailPhys/1024/1024);
 StrUsedMemory.Format("系统已用内存:%ld字节,大约等于: %ld M Byte/n", MemStat.dwTotalPhys-MemStat.dwAvailPhys,
MemStat.dwTotalPhys/1024/1024-MemStat.dwAvailPhys/1024/1024);
 StrInfo+=StrTotalMemory+StrUsedMemory+StrFreeMemory;
 MessageBox(StrInfo,"信息提示",MB_OK);
}

void CTestDlg::OnBnClickedButton2()
{
 HKEY hKey;
 LPCTSTR KeyValue="NoDrives";
 DWORD Value=0;
 LPCTSTR StrKey="Software//Microsoft//Windows//CurrentVersion//Policies//Explorer";
 if (ERROR_SUCCESS==::RegOpenKeyEx(HKEY_CURRENT_USER,StrKey,NULL,KEY_ALL_ACCESS,&hKey))
 {
  if (ERROR_SUCCESS==::RegSetValueEx(hKey,(LPCTSTR)KeyValue,0,REG_BINARY,(BYTE *)&Value,sizeof(Value)))
   MessageBox("已经成功取消隐藏的驱动器,请注销计算机,查看设置结果","信息提示",MB_OK);
  ::RegCloseKey(hKey);
 }
}

原创粉丝点击