Вниз
Скачать: CL | DM;

Регистрация своего расширения файла с указанием описания типа.   Найти похожие ветки 

 
AlexanderMS ©   (2007-06-02 18:25) [0]

Знаю, как вообще зарегистрировать свой тип файла. Но не знаю, как при регистрации указать текст, который будет отображаться в Проводнике в поле "Тип файла". Посмотрел у некоторых расширений в реестре, там есть свойство PersistentHandler, где указан GUID, и потом отдельно в "папке" под названием этого GUID хранится описание типа.

Может, можно как-нибудь проще это сделать? Если нет, то что, свой GUID генерировать? А вдруг он совпадёт с каким-нибудь ещё на другом компьютере? И вообще есть ли такое право - "забивать" GUID?


 
DVM ©   (2007-06-02 18:31) [1]


> А вдруг он совпадёт с каким-нибудь ещё на другом компьютере?

это вряд ли.


> И вообще есть ли такое право - "забивать" GUID?

Пожалей его.


procedure RegisterApp;
var
 Reg: TRegistry;
begin
 Reg := Tregistry.Create;
 try
   try
     Reg.RootKey := HKEY_CLASSES_ROOT;
     if Reg.OpenKey("\.ext\", true) then
     begin
       Reg.WriteString("", "Project1.DAT");
       Reg.CloseKey;
     end;

     if Reg.OpenKey("\Project1.ext\",true) then
     begin
       Reg.WriteString("", "Ìîé òèï ôàéëà");
       Reg.CloseKey;
     end;

     if Reg.OpenKey("\Project1.ext\shell\open\command\",true) then
     begin
       Reg.WriteString("", """ + ParamStr(0) +"" "%1"");
       Reg.CloseKey;
     end;

     if Reg.OpenKey("\Project1.ext\DefaultIcon\",true) then
     begin
       Reg.WriteString("", ParamStr(0)+ ",2");
       Reg.CloseKey;
     end;
   
   except
   end;
 finally
   Reg.Free;
 end;
end;


 
AlexanderMS ©   (2007-06-02 18:36) [2]


> "Ìîé òèï ôàéëà"

Прошу прощения за вопрос: это - тип файла?


 
AlexanderMS ©   (2007-06-02 18:38) [3]

"òèï ôàéëà" = "тип файла". Sorry.


 
DVM ©   (2007-06-02 18:42) [4]


> AlexanderMS ©  

да, это тип файла. Там еще замени в одном месте "Project1.DAT" на "Project1.ext"


 
AlexanderMS ©   (2007-06-02 18:43) [5]

DVM ©  Большое спасибо!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
4-1168441102
MonZon
2007-01-10 17:58
2007.06.24
Надо прочитать данные из COM-port.


2-1180446877
access
2007-05-29 17:54
2007.06.24
из Аксес в Делфи и обратно в Аксес


10-1134298458
GanibalLector
2005-12-11 13:54
2007.06.24
COM-сервер


15-1180025838
Витян
2007-05-24 20:57
2007.06.24
Зачем мне нужна электронная почта??


2-1180954130
nali
2007-06-04 14:48
2007.06.24
Не рисуется иконка на кнопке в таскбаре




   Наверх