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

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

 
Тёмыч   (2005-06-06 13:12) [0]

и открытие файла с этим расширением программой...

Здравствуйте!

Наверное это уже заезжанный вопрос, но все же помогите пожалуйста!

Заранее спасибо!


 
NeoVariant ©   (2005-06-06 13:43) [1]

Регистрация своего типа:

uses Registry;
...
procedure TForm1.RegisterFileType(ext: string; FileName: string);
var
 reg: TRegistry;
begin
 reg:=TRegistry.Create;
 with reg do
 begin
   RootKey:=HKEY_CLASSES_ROOT;
   OpenKey("."+ext,True);
   WriteString("",ext+"file");
   CloseKey;
   CreateKey(ext+"file");
   OpenKey(ext+"file\DefaultIcon",True);
   WriteString("",FileName+",0");
   CloseKey;
   OpenKey(ext+"file\shell\open\command",True);
   WriteString("",FileName+" "%1"");
   CloseKey;
   Free;
 end;
end;

Ну а регистрировать так:
RegisterFileType("DelphiWorld", Application.ExeName);
А как запускать файл - додумайся сам.


 
NeoVariant ©   (2005-06-06 13:48) [2]

А вообще, поищи инфу на тему TFileDescription - дескриптор файла, открываемого в данный момент приложением. Это примерно тоже, что и Drag&Drop:
http://delphimaster.net/view/4-1117818174/ - может поможет.


 
Чапаев ©   (2005-06-06 13:58) [3]

> Наверное это уже заезжанный вопрос
Таки да. FAQ почитать -- не судьба? Не говоря уж о чтении MSDN...



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

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



Память: 0.45 MB
Время: 0.029 c
1-1121531665
TStas
2005-07-16 20:34
2005.08.07
Почему StretchDraw не уменьшает прапорционально?


14-1121321379
syte_ser78
2005-07-14 10:09
2005.08.07
Курение


3-1120203745
Василий
2005-07-01 11:42
2005.08.07
Вопрос по правильному использованию транзакций в Fibplus.


4-1118130484
Андрей Жук
2005-06-07 11:48
2005.08.07
Как получить выбранный Item в ComboBoxEx


5-1092299241
stud
2004-08-12 12:27
2005.08.07
каким образом выполнить метод компанента?




   Наверх