Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.20;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.032 c
1-1110356107
mate
2005-03-09 11:15
2005.03.20
размер шрифта


14-1109746427
Cosinus
2005-03-02 09:53
2005.03.20
Как проверить скорость доступа к сайту?


3-1108559386
Вован_
2005-02-16 16:09
2005.03.20
Как переименовать поле dbf-файла перед его открытием?


4-1107783969
Anthony
2005-02-07 16:46
2005.03.20
Как открыть дверцу CD-RW?


14-1109698606
Nikolay(DW)
2005-03-01 20:36
2005.03.20
Поместить в орешник :)