Borland C++ Builder FAQ - Пример регистрации собственного расширения файла

Written on . Posted in C++ Builder

ОГЛАВЛЕНИЕ

Страница 30 из 127

Пример регистрации собственного расширения файла

// Напишите следующую  функцию:
#include <Registry.hpp> 
TRegistry *Reg;
Reg=NULL;
try
{
  Reg=new  TRegistry;
  Reg->RootKey=HKEY_CLASSES_ROOT;
  Reg->OpenKey("\\.ant",true);
  Reg->WriteString("","MyProgram");
  Reg->CloseKey();
  Reg->OpenKey("\\MyProgram",  true);
  Reg->WriteString("","My  document");
  Reg->CloseKey();
  Reg->OpenKey("\\MyProgram\\Shell\\Open\\Command",true);
  Reg->WriteString("",ParamStr(0)+"  \"%1\"");
  Reg->CloseKey();
  Reg->OpenKey("\\MyProgram\\DefaultIcon",true);
  Reg->WriteString("",ParamStr(0)+",  1");
  Reg->CloseKey();
}
__finally
{
if  (Reg!=NULL)delete Reg;
}
// Весь текст генерирует  расширение *.ant 
// А этот код загружает файл с расширением *.ant в  Image1.
if  (ParamCount>0)
{
asFileName=ParamStr(1);
if  (FileExists(asFileName))  Image1->Picture->LoadFromFile(asFileName);
  else  ShowMessage(asFileName+" ОШИБКА ЗАГРУЗКИ ФАЙЛА!!!");
}
 

форум c++ builder