Текущий архив: 2003.12.19;
Скачать: CL | DM;

Вниз

Как ассоцировать расширение файла с моей программой.   Найти похожие ветки 

← →
maxXP ©   (2003-12-07 18:39) [0]

Как ассоциировать расширение файла с моей программой.

---

← →
TUser ©   (2003-12-07 18:52) [1]

Регистрировать в реестре. Посмотри, как их описывают в HKLM\Software\classes

---

← →
Dred2k   (2003-12-07 19:38) [2]

Примерно так:


function AppRegisterFileType(Ext : String; AppName : String; AppDesc : String; AppEXE : String; AppOpenParams : String; IconID : Integer) : Boolean;
var tmpReg : TRegistry;
begin
tmpReg := TRegistry.Create;
try
try
with tmpReg do begin
RootKey := HKEY_CLASSES_ROOT;
OpenKey(Ext, True);
WriteString("", AppName);
CloseKey;
OpenKey(AppName, True);
WriteString("", AppDesc);
CloseKey;
OpenKey(AppName + "\Shell\Open\Command", True);
WriteString("", AppEXE + " " + AppOpenParams);
CloseKey;
OpenKey(AppName + "\DefaultIcon", True);
WriteString("", AppEXE + "," + IntToStr(IconID));
CloseKey;
end;
Result := True;
except
Result := False;
end;
finally
tmpReg.Free;
end;
end;


---

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

Текущий архив: 2003.12.19;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.014 c