Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

соответствие файлов приложению [D6, D7, Win2k, WinXP]

pavlov © (2003-04-15 14:03:00)
Привет, всем!

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

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

Babay (2003-04-16 06:58:00) [1]
я делаю так

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;

Cobalt (2003-04-15 16:03:00) [2]
посмотри в разделе реестра HKEY_CLASSES_ROOT\.txt, а затем HKEY_CLASSES_ROOT\txtfile
Надеюсь, ты многое поймешь.

Phantomouse (2003-04-15 14:26:00) [3]
Вручную можно сделать это выбрав в Моем Компьютере пункт свойства папки --- типы файлов и т.д.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »