Главная страница
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.021 c
14-68000
NickBat
2003-07-02 16:52
2003.07.21
Вопросы, вопросы...


1-67872
BillyJeans
2003-07-08 09:42
2003.07.21
TCheckListBox и его OnDrawItem...


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


1-67817
clickmaker
2003-07-07 20:24
2003.07.21
Параметр lcid в TExcelApplication.Workbooks


14-68026
АТ
2003-07-04 18:32
2003.07.21
А вдруг кто-нибудь уже мучился с PCL-форматом?