Форум: "Основная";
Текущий архив: 2003.07.21;
Скачать: [xml.tar.bz2];
ВнизКак зарегистрировать тип файла? Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c