⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mainform.cpp

📁 C++ BUILDER精彩编程实例集锦(源码)2 第三部分 文件操作 第四部分 图像处理
💻 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)
{//获取系统所有文件类型
   this->ListBox1->Clear();
   HKEY hKey;
   if(ERROR_SUCCESS==RegOpenKeyEx(HKEY_CLASSES_ROOT,"",0,KEY_ENUMERATE_SUB_KEYS,&hKey))
   {
     DWORD dwIndex=0;
     char Name[100];
     SHFILEINFO shSmall;
     while(RegEnumKey(hKey,dwIndex++,Name,100)==ERROR_SUCCESS)
     {
       if(Name[0]!='.')
    	   continue;
       ZeroMemory(&shSmall,sizeof(shSmall));
       SHGetFileInfo(Name,FILE_ATTRIBUTE_NORMAL,&shSmall,sizeof(shSmall),SHGFI_USEFILEATTRIBUTES|SHGFI_DISPLAYNAME|SHGFI_TYPENAME|SHGFI_ICON|SHGFI_SMALLICON);
       AnsiString StrFileType="";
       StrFileType+="文件扩展名:";
       StrFileType+=Name;
       StrFileType+="       文件类型:";
       StrFileType+=shSmall.szTypeName;
       this->ListBox1->Items->Add(StrFileType);
     }
     ::RegCloseKey(hKey);
   }
   MessageBox(Handle,"获取系统所有文件类型操作成功!","信息提示",MB_OK);

}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -