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

соответствие файлов приложению   Найти похожие ветки 

← →
pavlov   (2003-04-15 14:03) [0]

Привет, всем!

У меня такой вопрос:
как поставить в соответствие файлы с определенным
расширением какой-либо программе?
ну что бы при запуске файла запускалось бы соответствующее
ему приложение?
Как это делается?

Заранее благодарен!

---

← →
Phantomouse ©   (2003-04-15 14:26) [1]

Вручную можно сделать это выбрав в Моем Компьютере пункт свойства папки --- типы файлов и т.д.

---

← →
Cobalt ©   (2003-04-15 16:03) [2]

посмотри в разделе реестра HKEY_CLASSES_ROOT\.txt, а затем HKEY_CLASSES_ROOT\txtfile
Надеюсь, ты многое поймешь.

---

← →
Babay ©   (2003-04-16 06:58) [3]

я делаю так

function RegisterFileType(ExeFile, FileType, Extension, IconFile: String): Integer;
var
AReg: TRegistry;
Error: Integer;
begin
Error:= erOK;
AReg:= TRegistry.Create; // Open Registry
try
AReg.RootKey:= HKEY_CLASSES_ROOT;
AReg.OpenKey("", false);
AReg.OpenKey("."+Extension, true); //Create Key .Extension
AReg.WriteString("", Extension+"_file");
AReg.CloseKey;

AReg.OpenKey(Extension+"_file", true);
AReg.WriteString("", FileType);
AReg.OpenKey("DefaultIcon", true);
AReg.WriteString("", IconFile);
AReg.CloseKey;

AReg.OpenKey(Extension+"_file", true);
AReg.OpenKey("shell", true);
AReg.OpenKey("open", true);
AReg.OpenKey("command", true);
AReg.WriteString("", """+ExeFile+"""+""%1"");
AReg.CloseKey;
except
inc(Error, erRegistry);
end;

AReg.Free;
RegisterFileType:= Error;
end;

---

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

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



Память: 0.45 MB
Время: 0.011 c