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

Вниз

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

 
ev1972@yandex.ru   (2003-03-19 14:19) [0]

Как программно установить связь файла по расширению с определенным приложением (Open With... в проводнике)?


 
Clickmaker ©   (2003-03-19 14:56) [1]

HKEY_CLASSES_ROOT\.ext (По умолчанию)=yourfiletype
HKEY_CLASSES_ROOT\yourfiletype\shell\open\command (По умолчанию)="Путь к приложению" %1


 
Diamond Cat ©   (2003-03-19 15:00) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
reg:Treginifile;
begin
reg:=Treginifile.Create( "" );
with reg do begin
RootKey:=HKEY_CLASSES_ROOT;
// регистрируем расширение *.aaa
WriteString(".aaa","","myfile");
WriteString("myfile","","мой тип файлов");
// обозначаем какое приложение будет открывать наш тип
WriteString("myfile\DefaultIcon","",application.ExeName+",0");
//дествия которые доступны при клике правой кнопкой на нашем файле
WriteString("myfile\shell\моя команда Открыть\command","",application.ExeName+" "%1"");
WriteString("myfile\shell\моя команда Печатать\command","",application.ExeName+" /p"+ " "%1"");
WriteString("myfile\shell\Еще одна моя команда\command","",application.ExeName+" /w"+" "%1"");
Writestring("myfile\shell","","моя команда Открыть");
//освобождаем файл регистра
Free;
//уведомляем систему ,об изменении ассоциаций, и заставляем ее обновить иконку значков
SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
14-59916
kostya2000
2003-04-29 21:57
2003.05.19
УУУУУ! ФОРУМ МАСТАКОВ, КАК Я ДАВНО ТУТ НЕ БЫЛ, СКУЧАЮ :(


14-59856
Умид
2003-04-24 12:10
2003.05.19
компютер или программа не видит qtintf70.dll?


14-59852
Agent[007]
2003-05-01 10:48
2003.05.19
SHIT !!!


14-59919
Rulya
2003-04-30 10:09
2003.05.19
Выключение компьютера


3-59601
Alpine
2003-04-24 13:58
2003.05.19
Посоветуйте компоненты для доступа к базе MS SQL.