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

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

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

приложение по умолчанию [D7, WinXP]

dyuss © (2005-02-08 03:48:00)
не знаю, может глупый вопрос, но всё таки:
мне надо сделать моё приложение приложением по умолчанию.
Вопрос сводится к тому как получить имя файла, с помощью которого я запускаю свою прогу. Ну на примере текстого редактора, как узнать какой файл мне читать в Memo.

beatles_bntu (2005-02-08 13:53:00) [1]
uses
...,Registry;

var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
Reg.RootKey := HKEY_CLASSES_ROOT;
Reg.LazyWrite := False;

Reg.OpenKey('.bit',True);
Reg.WriteString('','beatles');
Reg.CloseKey;

Reg.OpenKey('beatles\shell\open\command',true);
Reg.WriteString('',Application.ExeName+' %1');
{это значит что в твою программу строка запуска будет передоватся первым тапаметром (ну типа вторым ведь есть еще 0) т.е. чтобы те узнать откуда и кем была вызвана твоя прога надо зделать следующие ParamStr(1) вернет путь к той проги которая тя застила}
Reg.CloseKey;

Reg.OpenKey('beatles\DefaultIcon',True);
Reg.WriteString('',Application.ExeName+',0');
{Ну это типа номер иконки в твоей проги которая будетиспользоватся бля всех файлов с расширением bit}

Reg.CloseKey;
Reg.Free;

alpet (2005-02-08 10:41:00) [2]
Можеть быть про параметры приложения, тогда надо использовать функцию ParamStr . А что бы твоя программа открывала файлы определенного типа (с определенным расширением), ее надо добавить в реестр. Или использовать контекстное меню (в Win2k/XP), "Открыть с помощью>Выбрать программу..."

Наверх

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