Текущий архив: 2005.08.07;
Скачать: 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 вся ветка
Текущий архив: 2005.08.07;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.039 c
