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

Мастера помогите....   Найти похожие ветки 

← →
Хлор ©   (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]

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



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

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



Память: 0.45 MB
Время: 0.006 c
3-32140
ola
2002-01-15 08:52
2002.02.11
как работать с шаблонами Word в Delphi


6-32311
Gunner
2001-11-17 00:21
2002.02.11
Point to Point Protocol


1-32210
VictorT
2002-01-25 17:26
2002.02.11
TMaskEdit


3-32119
KMZ
2002-01-15 12:38
2002.02.11
Привет всем !,народ помогите разобратся с проблемой


6-32303
Дремучий
2001-11-19 22:24
2002.02.11
как скачать картинку?




   Наверх