Вниз
Скачать: CL | DM;

приложение по умолчанию   Найти похожие ветки 

 
dyuss   (2005-02-08 03:48) [0]

не знаю, может глупый вопрос, но всё таки:
мне надо сделать моё приложение приложением по умолчанию.
Вопрос сводится к тому как получить имя файла, с помощью которого я запускаю свою прогу. Ну на примере текстого редактора, как узнать какой файл мне читать в Memo.


 
alpet   (2005-02-08 10:41) [1]

Можеть быть про параметры приложения, тогда надо использовать функцию ParamStr . А что бы твоя программа открывала файлы определенного типа (с определенным расширением), ее надо добавить в реестр. Или использовать контекстное меню (в Win2k/XP), "Открыть с помощью>Выбрать программу..."


 
beatles_bntu ©   (2005-02-08 13:53) [2]

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;



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c
1-1110189099
Checist [root]
2005-03-07 12:51
2005.03.20
Наседник TComboBox


3-1108976389
BeginerEmpty
2005-02-21 11:59
2005.03.20
изменения значения IBX


1-1110058906
Davinchi
2005-03-06 00:41
2005.03.20
Как Variant привести к TComponent или TWinControl


4-1107798622
Putnik
2005-02-07 20:50
2005.03.20
EnumCalendarInfo


1-1109862724
Володя
2005-03-03 18:12
2005.03.20
диспечер задачь




   Наверх