Вниз
Скачать: 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.023 c
1-1121935230
AGENT
2005-07-21 12:40
2005.08.07
Курсоры


14-1121257857
Digitman
2005-07-13 16:30
2005.08.07
IntraWeb + JavaScript


14-1121246501
kai
2005-07-13 13:21
2005.08.07
Список предметов, которые можно/нельзя посылать почтой в Украину


11-1104578339
N0th!ng
2005-01-01 14:18
2005.08.07
Помогите с KOL!


3-1120204988
greySerg
2005-07-01 12:03
2005.08.07
Почему ADOTable не чистит за собой память ?




   Наверх