Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Вниз

Мастера помогите.... 


Хлор   (2002-01-23 07:59) [0]

Есть у меня текстовый редактор.. работает нормально и все хорошо, только как сделать что бы он открывал файлы по ассоциации к нему.



Chris   (2002-01-23 09:42) [1]

Для своей программы я использую файлы данных с расширением .tw.
Вот как я реализовал привязку этого типа к моей проге:

Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_CLASSES_ROOT;
if not Reg.OpenKey(".tw",False) then
begin
Reg.OpenKey(".tw",True);
Reg.WriteString("","TemplateKniga");
Reg.CloseKey;
Reg.OpenKey("TemplateKniga",True);
Reg.WriteString("","Шаблон для БД Книга");
Reg.CloseKey;
// Далее определяется иконка для файлов этого типа
Reg.OpenKey("TemplateKniga\DefaultIcon",True);
Reg.WriteString("",Application.ExeName+",0");
Reg.CloseKey;
// Вообще-то мне необходимо, чтобы по двойному щелчку файл открывался в WordPad"е, но прописать можно любую прогу, способную обрабатывать строку параметров
Reg.OpenKey("TemplateKniga\shell\open\command",True);
Reg.WriteString("",""C:\Program Files\Accessories\WORDPAD.EXE" "%1"");
end
else
begin
//Это блок вредности.
//Все-равно переопределяет данный тип на WordPad.
Reg.CloseKey;
Reg.OpenKey("TemplateKniga\shell\open\command",True);
Reg.WriteString("",""C:\Program Files\Accessories\WORDPAD.EXE" "%1"");
end;
Reg.CloseKey;
Reg.Free;



Хлор   (2002-01-26 03:12) [2]

Спасибо..... Очень благодарен




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
3-32132           chelobaka             2002-01-15 16:37  2002.02.11  
Как избежать появления окна с запросом на ввод имени и пароля


1-32241           MAN-IN-RED            2002-01-27 23:11  2002.02.11  
Вопрос есть! Попытка номер 2.


3-32170           Hawk2                 2002-01-16 18:28  2002.02.11  
Снова о кодировке.


6-32309           Abzetdin              2001-11-19 19:36  2002.02.11  
Передача динамического массива через Сокеты. Пример....


3-32173           headhunter            2001-12-06 21:29  2002.02.11  
Хочу уйти от BDE. Помогите плиз