Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.21;
Скачать: CL | DM;

Вниз

Как зарегистрировать тип файла?   Найти похожие ветки 

 
Cr@zy-EyE ©   (2003-07-09 12:34) [0]

Как зарегистрировать тип файла из программы(через реестр, например)? Сразу еще вопрос по реестру: Как считать список имен параметров в текущем ключе?


 
Skier ©   (2003-07-09 12:36) [1]

>Cr@zy-EyE © (09.07.03 12:34)
1)

> Как зарегистрировать тип файла из программы(через реестр,
> например)? Сразу еще вопрос по реестру

В FAQ было (или здесь или на "Королевстве", точно не помню...)
2)

> Как считать список имен параметров в текущем ключе?

см. TRegistry


 
Babay ©   (2003-07-09 12:41) [2]

вот насчет регистрации, где взял непомню но вроде работало...

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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.025 c
14-67985
Mishenka
2003-07-03 18:09
2003.07.21
Размер exe файла...


8-67923
CASSIUS
2003-04-01 16:41
2003.07.21
DirectX & OpenGL


3-67665
oss
2003-06-26 11:47
2003.07.21
пользователь по умолчанию для MS SQL


1-67893
TDIONIS
2003-07-08 12:20
2003.07.21
Запуск файла


14-68001
MetalFan
2003-07-04 07:36
2003.07.21
DBGrid.SelectedRows